Macro excel Guardar a PDF Ayuda
Publicado por walter (8 intervenciones) el 15/05/2020 18:26:58
Hola Amigos me podrían ayudar y corregir en donde me equivoco, les cuento...quiero guardar automáticamente con un nombre distinto cada archivo, el nombre de cada archivo seria el que esta ubicado en la solapa Formulario celda B5, y guardar el rango B19 al D110 en formato pdf, les muestro lo que hice me da error y adjunto la macro, me ayudan a corregirlo, que debo poner para que lo guarde automáticamente cada vez que la ejecute..... Gracias
1
2
3
4
5
6
7
8
9
10
11
12
13
Sub EXPORTARPDF()
'
' EXPORTARPDF Macro
'
'
Ruta_PDF = "F:\DISCO C DESCARGAS\Documents\"
Nombre_PDF = Worksheets("Formulario").Range("B5").Value
Worksheets("Formulario").Range("B19;D110").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Ruta_PDF & Nombre_PDF, Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=True
End Sub
- F-1357-ANO-2019-NUEVO-MACRO-2019.zip(66,4 KB)
Valora esta pregunta


0