Grabar archivo con nombre y fecha

12/11/2006 - 23:17 por Xavi Vegas | Informe spam
Hola masters,
tengo un archivo modelo que se llama STOCK y quiero hacer una macro que
grabe el archivo con el nombre "STOCK 12 11 06.xls", siendo 12 11 06 la fecha
que sale en la celda a1, que saco con la función hoy().
¿Es posible hacerlo?
Muchas gracias!
Xavier
 

Leer las respuestas

#1 Tux
13/11/2006 - 15:14 | Informe spam
Xavi Vegas escribió:
Hola masters,
tengo un archivo modelo que se llama STOCK y quiero hacer una macro que
grabe el archivo con el nombre "STOCK 12 11 06.xls", siendo 12 11 06 la fecha
que sale en la celda a1, que saco con la función hoy().
¿Es posible hacerlo?
Muchas gracias!
Xavier



Hola Xavier :-)

Este codigo te Guardara archivo STOCK con la fecha del dia en el que
estes, y te lo guardara en la misma ruta de donde ejecutes la macro:

Sub Guardar_File_Fecha_Hoy()



Dim RutArchivo
RutArchivo = ThisWorkbook.Path & "\"

ActiveWorkbook.SaveAs Filename:= _
RutArchivo & "STOCK_" & Format(Date, "dd-mm-yyyy")


End Sub

Nos comentas ok? :-)



¡Un SAludo!:-)

www.fermu.com
www.zorval.es

Preguntas similares