macro para grabar una hoja de un libro como *.csv y tomando como nombre el contenido de una celda

15/02/2007 - 12:38 por peibol | Informe spam
Hola a todos, alguien podría orientarme sobre cómo hacer esto, gracias.
 

Leer las respuestas

#1 Abraham
15/02/2007 - 18:03 | Informe spam
Esto lo hice, practicamente solo con la grabadora de macros:

Sub Macro1()
Dim nombre As String
nombre = [e1]
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\avalencia\Escritorio\" & nombre &
".csv", FileFormat:= _
xlCSV, CreateBackup:=False
Application.WindowState = xlMinimized
End Sub


Ah, no olvides de cambiar la ruta a la tuya, y la celda a la que tu
desees. Eso si, te dar error si en la celda hay caracteres no
permitidos en el nombre de un archivo. Se puede crear una UDF para
evitar esto, pero si no me equivoco en este mismo foro hay algunas
echas.

Abraham

Preguntas similares