Macro para generar archivo txt

hola, 'anomimo/a' !

Como seria el codigo para generar un archivo txt, es decir
quisiera que la columna A,B,C,D,G,H,X,Y,Z,AA,AB FILA 5 HASTA LA 10,000 se genere mi archivo txt.

opciones ?... [creo que] existen suficientes alternativas :D... solo que haria falta conocer algunos otros detalles como:
- 'tipo' de archivo de texto 'generable' ?
- sera SIEMPRE 'hasta' la fila 10,000 ?
- y quizas algunos otros mas -?-

en via de mientras, el siguiente codigo [de ejemplo] hace +/- lo que solicitas ;)
'ajusta' donde corresponda la ruta y el nombre y el 'tipo' de archivo [de texto] que se genera
[y... no tiene prevencion/correccion de -posibles- errores como si ya existiera el nombre del archivo] :-(

si cualquier duda [o informacion adicional]... comenas ?
saludos,
hector.

== en un modulo de codigo normal =Sub Genera_Txt()
Dim Ruta As String, Archivo As String
Ruta = "c:uta y\sub-carpetas\donde se guardara el\"
Archivo = "nombre del archivo"
With Workbooks.Add
ThisWorkbook.Worksheets("hoja1").Range("a:d,g:h,x:ab").Copy
With .Worksheets(1)
.Range("a1").PasteSpecial xlPasteValues
.Rows("1:5").EntireRow.Delete
End With
.SaveAs FileName:=Ruta & Archivo, FileFormat:=xlTextWindows
.Close False
End With
End Sub