Para crear un archivo PDF desde Excel utilizando VBA, puedes seguir estos pasos:

Iniciar un nuevo procedimiento: Comienza creando un nuevo procedimiento en tu módulo de VBA con un nombre descriptivo, como “CrearPDF”.

Definir el nombre y la ruta del archivo PDF: Decide el nombre que deseas para el archivo PDF y especifica la ruta donde se guardará. Puedes utilizar la función ExportAsFixedFormat para exportar el contenido de una hoja de trabajo a un archivo PDF.

Exportar la hoja activa como PDF: A continuación, te muestro un ejemplo de código para exportar la hoja activa a un archivo PDF:

               
               Sub ExportAsPDF()
    ActiveSheet.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:="Test.pdf", _
        OpenAfterPublish:=False, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        Quality:=xlQualityStandard, _
        From:=1, To:=2
End Sub

               
              

Explicacion del Código

En este código:

• Type especifica el formato (puede ser xlTypePDF o xlTypeXPS).
• Filename es el nombre del archivo (puedes indicar la ruta completa).
• OpenAfterPublish determina si el PDF se abrirá automáticamente después de la creación.
• IncludeDocProperties indica si el PDF tomará las propiedades del archivo Excel.
• IgnorePrintAreas permite ignorar las áreas de impresión configuradas en Excel.
• Quality se refiere a la calidad de la exportación.
• From y To indican las páginas a exportar (por defecto, exporta todas las páginas).

Exportar todas las hojas del libro de trabajo: Si deseas exportar todas las hojas del libro de trabajo a un solo archivo PDF, puedes usar el siguiente código:

               
               Sub ExportActiveWorkbookAsPDF()
    Dim strFileName As String
    strFileName = ThisWorkbook.Path & "\Test.pdf"
    ActiveWorkbook.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:=strFileName
End Sub