Macro que genere archivo de texto con un nombre diferente

[jjesus]

Eví­o archivo de la macro que no pude incluir en mi mensaje anterior

 

[Adrian]

Espero te oriente:

Sub Copiarypegar()

Range("A1").Select
Selection.Copy
Range("A2:A134").Select
ActiveSheet.Paste
Range("a1").Select
For Each Celda In Range("a1:a400")...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jjesus]

Mi estimado Adrián: De entrada me parece que se dá respuesta a lo que estaba esperando y por lo mismo estoy muy agradecido con vos.
Te ruego sigas así­ de esplendido.Gracias