Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 11

togliere delle fastidiose """""""

  1. #1
    cubateam non  in linea Novello
    Ciao a tutti,

    sono riuscito (con una macro VB) a mettere su txt delle celle excell, con la funzione Write #1, solo che il contenuto delle celle mi compare sul blocco note preceduto e seguito dalle virgolette.

    cio ad esempio:

    Write #1, Cells(1, 1).Text > se ilcontenuto della cella pippo sul txt mi ritrovo "pippo", io vorrei che quelle virgolette non ci fossero. Come posso fare?


    sapete anche dirmi come posso a prire il file txt, per aprire intendo aprire proprio il file tipo doppio clic.


    spero che mi possiate aiutare, grazie a tutti per l' attenzione.


    cubateam

  2. #2
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    non usare Write, usa Print

    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

  3. #3
    cubateam non  in linea Novello
    Ciao grazie truster, provero. Sai dirmi come posso aprire il file testo creato cioe eseguirein automatico il doppio click?



    grazie

  4. #4
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    cosa significa, per te, "eseguire in automatico il doppio click"?
    vuoi che una volta creato il testo sia aperto con il Blocco Note, o con l'applicazione di default per i file di testo?

    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

  5. #5
    L'avatar di dragone bianco
    dragone bianco non  in linea Amanuense
    usa questa funzione (Di ik2zok)

    Public Sub ExecuteFile(FilePath As String)
        'Esegue file
        On Error GoTo error
        Dim ret As Integer
        ret = Shell("rundll32.exe url.dll,FileProtocolHandler " & (FilePath), vbNormalFocus)
        Exit Sub
    error:
        MsgBox Err.Description, vbExclamation, "Error"
    End Sub
    
    Da mettere in un modulo.

    Apre qualunque file con il programma predefinito
    Ex
    ExecuteFile ("c:\Prova.doc") Apre il file con Word,
    ExecuteFile ("c:\Prova.xls") Apre il programma con Excel,

    Ecc..

    Ciao
    ℹ️ Leggi di pi su dragone bianco ...

  6. #6
    cubateam non  in linea Novello
    Grazie per il print!!!!Funzia!!!

    "vuoi che una volta creato il testo sia aperto con il Blocco Note, o con l'applicazione di default per i file di testo?" La risposta SI, proprio cos.

  7. #7
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    allora puoi utilizzare tranquillamente proposto da Dragone Bianco

    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

  8. #8
    cubateam non  in linea Novello
    Ops...temo di non aver capito come utilizzare il suggerimento dell' ottimo dragone. Io vorrei aprire "C:\FILEPROV.txt". Per compilate il txt utilizzo questo script e tutto sunziona, posso aprire il file prima di uscire da questa private sub?

    Open "C:\FILEPROV.txt" For Output As #1
    Dim testo
    Dim orizzontale
    For orizzontale = 8 To 12
    testo = 1
    Do Until Cells(testo, orizzontale).Text = ""
    Print #1, Cells(testo, orizzontale).Text
    testo = testo + 1
    Loop
    Write #1,
    Next orizzontale
    Close #1

    vi ringrazio....

  9. #9
    cubateam non  in linea Novello
    se faccio copia incolla, non mi da errori e non so perche mi apre la cartella documenti.....

  10. #10
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    ovvio che puoi...
    metti la Public Sub (di ik2zok), che ha postatato Dragone Bianco, in un Modulo

    dopo, alla fine della creazione del tuo file di testo scrivi:

    ExecuteFile ("c:\FILEPROV.txt")
    
    TheTruster
    Ultima modifica di TheTruster; 21-06-2007 20:14 
    ℹ️ Leggi di pi su TheTruster ...

+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo

Potrebbero interessarti anche ...

  1. Risposte: 1
    Ultimo Post: 20-07-2020, 16:26
  2. Risposte: 1
    Ultimo Post: 30-11-2017, 17:28
  3. Risolto: LibreOffice "BASE" - Connessione a db MYSQL "drive JDBC non caricati" non li vede
    Da CMCS nel forum LibreOffice, OpenOffice e altro
    Risposte: 5
    Ultimo Post: 30-07-2014, 12:45
  4. Risposte: 5
    Ultimo Post: 03-04-2014, 18:05
  5. Risposte: 8
    Ultimo Post: 11-10-2005, 17:21