avevo la necessità di modificare la seguente macro per esportare un determinato range da excel in file txt:
La mia difficoltà e che mi esporta solo la prima colonna e anche se applico i codici per espandere il range
dalla colonna A alla colonna z, mi da errore.
- Codice: Seleziona tutto
stringOfText = ""
myFileName = "C:\documenti\datiExcel.txt" & "myFileName.txt"
delimitingCharacter = vbNewLine
fin = Cells(1, 1) + 1
ini = fin - 100
For i = ini To fin
stringOfText = stringOfText & Sheets("Archivio").Range("A" & i).Value & delimitingCharacter
'Questa è la riga che ho cercato di modificare
'stringOfText = stringOfText & Sheets("Archivio").Range(Cells("A & i &: Z" & i)).Value & delimitingCharacter
Next i
Il punto è che vorrei esporrtare le ultime 100 righe di un archivio in file di testo.
Grazie a chi può aiutarmi.
Francesco