Sub PDF()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ThisWorkbook.Path & "\prueba.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
Pero quisiera poder realizar lo siguiente:
-El archivo PDF se genere con el mismo nombre del libro de excel
-El archivo PDF se guarde en la misma ruta del libro de excel
-El archivo PDF y Excel queden cerrados.
Siempre gracias por su tiempo,
Saludos
Daniel,
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Actualmente estoy utilizando esta pequeña macro
Sub PDF() ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:=ThisWorkbook.Path & "\prueba.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True End Sub
Pero quisiera poder realizar lo siguiente:
-El archivo PDF se genere con el mismo nombre del libro de excel
-El archivo PDF se guarde en la misma ruta del libro de excel
-El archivo PDF y Excel queden cerrados.
Siempre gracias por su tiempo,
Saludos
Daniel,