¿Cómo guardar un documento Word como PDF desde Excel con VBA?

Para guardar un documento de Word como PDF utilizando VBA desde Excel, necesitarás automatizar Word desde Excel. Aquí tienes un ejemplo de cómo hacerlo usando VBA:

   Sub GuardarWordComoPDF()
       Dim objWord As Object
       Dim objDocumento As Object
       Dim strRutaDocumento As String
       Dim strRutaPDF As String

       ' Especifica la ruta del documento de Word
       strRutaDocumento = "C:rutaaldocumento.docx" ' Cambia esto a tu ruta de archivo

       ' Especifica la ruta donde deseas guardar el PDF
       strRutaPDF = "C:rutadesalidadocumento.pdf" ' Cambia esto a tu ruta deseada

       ' Crea una instancia de Word
       Set objWord = CreateObject("Word.Application")
       
       ' Abre el documento de Word
       Set objDocumento = objWord.Documents.Open(strRutaDocumento)

       ' Guarda el documento como PDF
       objDocumento.ExportAsFixedFormat _
           OutputFileName:=strRutaPDF, _
           ExportFormat:=17 ' El valor 17 es para formato PDF

       ' Cierra el documento y la aplicación de Word
       objDocumento.Close False
       objWord.Quit

       ' Libera los objetos
       Set objDocumento = Nothing
       Set objWord = Nothing

       MsgBox "El documento ha sido guardado como PDF exitosamente."
   End Sub

Abre el editor de VBA: Presiona `ALT + F11` en Excel para abrir el Editor de VBA.
Inserta un nuevo módulo: Ve a `Insertar > Módulo` para crear un nuevo módulo en el proyecto de VBA.
Agrega el código VBA: Copia y pega el siguiente código en el módulo:
Ajusta las rutas: Modifica `strRutaDocumento` y `strRutaPDF` con las rutas correctas en tu sistema para el archivo de Word que desea convertir y el nombre del archivo PDF de salida.
Ejecuta el código: Puedes ejecutar esta macro presionando `F5` en el editor de VBA, asegurándote de tener las rutas y permisos necesarios.

Este código creará una instancia de Word, abrirá el documento especificado, lo guardará como PDF en la ubicación especificada y luego cerrará Word. Asegúrate de que la función `ExportAsFixedFormat` está disponible en tu versión de Word para que esto funcione correctamente. Si estás utilizando una versión de Office que permite el uso de estas funciones, el código debería ejecutarse sin problemas.