Ciao a tutti , come vedete posso con la macro sottostante aprire un file txt e leggerne il contenuto in una text1.text.
Il problema č che non riesco a , modificando il testo contenuto nella text1 , a salvare il file txt (istruzioni) col nuovo testo .
Come devo impostare il codice in un cmd per poter salvare il testo modificato ?
Grazie per l'aiuto e i consigli.
Luca
Private Sub Apri()
Text1.Text = ""
Open App.Path & "\Istruzioni.txt" For Input As #1
While Not EOF(1)
Input #1, data
Text1.Text = Text1.Text & data & vbCrLf
Wend
Close #1
End Sub
|