Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Excel destinazione file txt

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Excel destinazione file txt

Postdi libraio » 18/01/17 16:58

Ciao a tutti,
ho recuperato in un post precedente il seguente codice proposto da Anthony47 e l'ho modificato per le mie esigenze con successo.
Non riesco tuttavia a dare la destinazione voluta al file .txt creato, che dovrebbe essere salvato sul desktop, con eventuale sovrascrittura sull'esistente.
Chi mi aiuta?...

Ecco il codice:

Sub textwrt()
OutArea = "L2:L1000" '<<< Area da salvare
LastR = Evaluate("=MAX((" & OutArea & "<>"""")*(ROW(" & OutArea & ")))")
'
Filename = "OrdineMELI.txt" '<<< Il nome del file
FileNo = FreeFile
Open Filename For Output As #FileNo
aaa = Range(OutArea).Cells(1, 1).Resize(LastR - Range(OutArea).Cells(1, 1).Row + 1).Address
For Each myCell In Range(OutArea).Cells(1, 1).Resize(LastR - Range(OutArea).Cells(1, 1).Row + 1)
If myCell.Row < LastR Then
Print #FileNo, myCell.Value
Else
Print #FileNo, myCell.Value;
End If
Next myCell
Close #FileNo
End Sub
libraio
Utente Senior
 
Post: 300
Iscritto il: 04/01/10 20:31

Sponsor
 

Re: Excel destinazione file txt

Postdi ricky53 » 18/01/17 17:33

Ciao,
cambia

Filename = "OrdineMELI.txt"

in

Filename = "C:\Tuo-Percorso\OrdineMELI.txt"

Consiglio: non salvare sul Desktop ma su un percorso tuo specifico, meglio se sul disco "D".
Dice il vecchio saggio provare e riprovare è l'unica strada per imparare

Più chiara è la vostra spiegazione
Più immediata sarà la nostra soluzione


. . . . . . . . . .
S.O. W7; Office 2003-10-13-16
Avatar utente
ricky53
Utente Senior
 
Post: 4526
Iscritto il: 11/04/09 19:29
Località: Italia

Re: Excel destinazione file txt

Postdi libraio » 18/01/17 18:13

Grazie per la soluzione; è quanto cercavo!
Concordo, ovviamente, sul consiglio di non salvare sul desktop, tant'è che ho modificato la estinazione in una cartella "ad hoc".
Siete insostituibili
libraio
Utente Senior
 
Post: 300
Iscritto il: 04/01/10 20:31


Torna a Applicazioni Office Windows


Topic correlati a "Excel destinazione file txt":


Chi c’è in linea

Visitano il forum: Nessuno e 37 ospiti