Seguro en más de una ocasión se ha presentado la necesidad de guardar la Hoja de Excel en formato PDF, pues es precisamente lo que vamos a realizar en el siguiente ejercicio.
Macro para exportar datos de una hoja de Excel a Pdf.
Método ExportAsFixedFormat: Con la aplicación de este es posible exportar la Hoja de Excel a un archivo en formato PDF o XPS.
Para el siguiente ejemplo, vamos a trabajar con la misma tabla sencilla de la entrega anterior:
El objetivo es guardar esta hoja en un archivo PDF y lo primero es ingresar al editor de Visual Basic, puede ser con la combinación de teclas Alt + F11 y desde el explorador de proyectos, es necesario dar doble clic sobre la hoja donde se requiere crear la macro que para nuestro ejercicio se ubicará en la Hoja1:
Excel a PDF.
Aquí el código para exportar datos en Excel en formato Pdf.
Sub ExportarPDF()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ThisWorkbook.Path & "\Gerencie.pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
Queda de la siguiente manera en el editor VBA:
Veamos lo que significan cada una de las líneas:
- La primera línea Sub ExportarPDF(), indica el inicio de la macro.
- Las siguientes líneas excepto la última en realidad es una sola línea de código dividida en 3 partes para que pudiera ser visible en la imagen (obsérvese que al final de cada línea se encuentra un guion bajo con el cual se puede separar una línea de código en varias partes y que sea demasiado larga para nuestro gusto). Lo que se hace es utilizar del Objeto ActiveSheet el Método ExportAsFixedFormat e indicando el tipo que sea PDF con el parámetro Type:=xlTypePDF. Luego se especifica la ruta para guardar y el nombre que en este ejemplo será “Gerencie.pdf” y finalmente se asigna el valor Falso a las características de Propiedades y área de impresión; la última propiedad OpenAfterPublish se encuentra en True, lo que significa que una vez se genere el PDF, lo abra
- La última línea marca el fin (End) de la Macro o Subrutina (Sub).
Para ejecutar la macro, lo ideal es insertar una autoforma en la Hoja1 y luego asignar la macro que acabamos de crear (clic derecho sobre la Autoforma y seleccionar la opción Asignar macro:
Finalmente seleccionar la macro que se acaba de crear:
Y al dar clic sobre el la autoforma, la macro genera el archivo PDF en la ruta donde tenemos el archivo Excel:
Así como también deja abierto el mismo archivo para ser revisado:
Recomendados.