macro para crear txt

A ver si entendí:

a) Seleccionas la fila 200 (por ejemplo).
b) Y quieres generar un txt cuyo nombre de archivo será el que se
encuentre en la celda A200, y cuyo contenido será lo que se encuentre
en la celda AB200.

¿Es tanto así?...
(Mi duda reside en que tienes 28 columnas de información y parecerías
desear exportar la info de una sola de ellas).

Saludos, Cacho.

On 7 jun, 20:00, cc wrote:

Hola, a todos, no sé nada de macros ni vbs, pero lo intentaré.

Tengo un excel en el que tengo datos hasta la columna AE y 6000 filas.

Necesito crear un txt por cada fila, que el monbre del txt sea
contenidoceldaA6.txt y el contenido del txt corresponda a
contenidocelda AB.

La idea es poner un botón en cada linea que llame a la macro cada vez
que quiera crear un txt de esta linea.

Un saludo y gracias a todos por la colaboración.

Hola Cacho,

Efectivamente la información del resto de columnas no deseo
importarla, solamente de dos celdas de cada linea (una para nombre de
txt y otra la información que contiene el txt).

Gracias por tomarte interés.

En tal caso, podrías intentar (para Excel 2010/2007) algo así:

sub GeneraMiniArchivoDeTexto()
dim myfile as string, mytexto as string
myfile = thisworkbook.path & "\" & _
cells(selection.row, "a") & ".txt"
if dir(myfile) <> "" then kill myfile
mytexto = cells(selection.row, "ab")
workbooks.add
[a1] = mytexto
with activeworkbook
.saveas filename:=myfile, fileformat:=xltextprinter
.close false
end with
end sub

On 8 jun, 13:03, cc wrote:

Hola Cacho,

Efectivamente la información del resto de columnas no deseo
importarla, solamente de dos celdas de cada linea (una para nombre de
txt y otra la información que contiene el txt).

Gracias por tomarte interés.