Generar PDF con Macros en Excel VBA

Seguro que en más de una ocasión se te ha presentado la necesidad de guardar los datos de una Hoja en especifico de Excel a un archivo PDF, pues es ocasión te presentare dos tipos de como Generar PDF con Macros solo con dar click a un Botón…

Estos son algunos de los tipos para poder Generar PDF desde Excel con Macros. Veamos.

  • Declaramos la Variable, asignaremos la Celda de referencia, especificaremos el rango que deseamos convertir a archivo PDF, y por ultimo generamos el Archivo pdf y se guardara en la Ruta donde se encuentra el Archivo base, todo se realizara por medio del siguiente Código.
La Primera macro:

Tendrá como nombre “PDF_NOMBREASIGNA”, el cual hará referencia a una Celda en específico para el nombre del archivo PDF, y la llamaremos por medio de un Botón desde la Hoja en la que Trabajaremos.

Declaramos la Variable como “nombrearch” de tipo “String”.

Dim nombrearch As String

Acá hacemos referencia a la Celda “B2”, donde se encuentra el nombre que llevara el Archivo PDF ya generado.

nombrearch = ActiveSheet.Range(“B2”)

Decimos que el Archivo PDF ya generado se nos guarde en la misma Ruta donde se encuentra guardado el archivo principal de donde se está generando el archivo PDF.

ruta = ActiveWorkbook.Path

Especificamos el rango que necesitamos convertir a PDF, como por ejemplo en este caso se refiere desde la Celda “B1” hasta la Celda “K45” y lo Seleccionamos.

ActiveSheet.Range(“B1:K45”).Select

Convertimos el rango seleccionado a PDF, luego lo guardamos en la misma ruta especificada y lo concatenamos con “nombrearch”, que hará referencia al nombre del archivo y con la extensión “.pdf”, y listo PDF generado.

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ruta & “\” & nombrearch & “.pdf”, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False

Ya por ultimo confirmamos que el Archivo PDF se generó exitosamente y podemos proseguir con lo siguiente.

MsgBox (“Se ha creado archivo PDF con Título”), vbInformation, (“PDF-Aguirre”)

Así es como te quedara la Primera Macro:

La Segunda macro:

Tendrá como nombre “PDF_NOMBRE”, el cual solo se especificará el rango de celdas que se convertirán a archivo PDF, y la macro será llamada desde un Botón en la Hoja donde estamos Trabajando.

Decimos que el Archivo PDF ya generado se nos guarde en la misma Ruta donde se encuentra guardado el archivo principal de donde se está generando el archivo PDF.

ruta = ActiveWorkbook.Path

Especificamos el rango que necesitamos convertir a PDF, como por ejemplo en este caso se refiere desde la Celda “B1” hasta la Celda “K45” y lo Seleccionamos.

ActiveSheet.Range(“B1:K45”).Select

Convertimos el rango seleccionado a PDF, luego lo guardamos en la misma ruta especificada y lo concatenamos con el nombre de “Macro y VBA”, ya que será un nombre predeterminado para ese archivo y con extensión “.pdf”, y listo.

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ruta & “\” & “Macro y VBA” & “.pdf”, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False

Ya por ultimo confirmamos que el Archivo PDF se generó exitosamente y podemos proseguir con lo siguiente.

MsgBox (“Se ha creado archivo PDF con nombre: Macro y VBA”), vbInformation, (“PDF-Aguirre”)

Así es como te quedara la Segunda Macro:

Así te quedaran los archivos PDF ya generados desde Excel:

En tus Aplicativos o Bases de Datos que estés realizando en Excel, y necesitas generar PDF de dichos datos y quieres ir guardando reportes por fechas, pues estos dos tipos de Códigos te podrán ayudar, y facilitar el trabajo, ya que tu podrás optar por los dos tipos que encuentras acá en esta página.

Si te gusta Trabajar con Excel y se te hace más fácil con Macros, pues Aquí te estaré dejando el Link de estos dos Ejemplos de cómo generar PDF desde Excel.

Descarga el primer Ejemplo desde:  AQUÍ 1

Descarga el segundo Ejemplo desde:  AQUÍ 2

Explicación del Ejemplo “1” : VER VÍDEO 1

Explicación del Ejemplo “2” : VER VÍDEO 2

Password VBA = AGUIRRE2017


  https://goo.gl/iQRzhu “Canal de Aguirre”

  https://goo.gl/FS4UcZ “Canal MacroExcel” Próximamente todos los vídeos disponibles aquí”

  https://goo.gl/qKpNFe “Pagina Oficial MacroExcel”

  https://goo.gl/cQQ7Gi “Facebook MacroExcel – ME”
Recuerda también: contamos con un grupo privado síguenos y envíanos la solicitud si deseas ayuda y aportar en la comunidad “MacroExcel – ME”

Categorías: Vba

Deja un comentario

WhatsApp Necesitas Ayuda?
A %d blogueros les gusta esto: