Guardar Hoja1 como PDF con formato de fecha
Hola experto, quisiera que me ayudes con el siguiente problema. Tengo un formulario que al finalizar me guarda las facturas que he recibido durante el día, me debería generar un pdf para pasárselo a mi jefe. El problema es que se confunden unos con otros y quisiera colocar la marca de la fecha en el nombre del archivo ("Reporte") para que se vea así: Reporte 01/Feb/2014 o similar. Como lo hago si al indicarle que me agregue Date al nombre me hace un error 1004 No se ha guardado el documento. Puede que el documento este abierto o que se haya encontrado un error al guardar.
El código que utilizo es el siguiente:
Hoja2.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Reportes\R-" & Date & ".pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, From:=1, To:=3
Que estoy haciendo mal? Es super urgente saberlo! Gracias
1 Respuesta
El problema es que estas utilizando el símbolo "/" el cual no es permitido para utilizar en nombres de archivos de Microsoft.
Te aconsejo cambiar el formato de fecha a dd-mmm-yyyy o si quieres complicarte un poco más con la macro en lugar de
& Date &
cambia por:
& str(day(Date)) & "-" & str(month(Date)) & "-" & str(year(Date)) &
Si te sirve la respuesta
