Escribir datos en un archivo de texto desde Excel con vba
Expongo un pequeño ejemplo sobre cómo escribir datos desde Excel a un archivo de Texto.
El usuario podrá utilizar es libre de utilizar For, Do Loop, While, etc.
Sub EscribirEnArchivoTxt() Open "c:datatextfile.txt" For Output As #1 Print #1, ActiveSheet.Range("A1").Value Print #1, ActiveSheet.Range("A2").Value Print #1, ActiveSheet.Range("A3").Value Close #1 End Sub