☰

¿Cómo imprimir en PDF con Excel VBA?

tag-icon • tag-icon microsoft-excel microsoft-excel-2010 pdf vba
¿Cómo imprimir en PDF con Excel VBA?

Como sugiere el título... Estoy buscando ampliar mi automatización para incluir la impresión directa en PDF. Las macros que he escrito ya dan formato al área de impresión y a la configuración de página según las necesito. Pero cuando voy a grabar mis macros no se captura nada para imprimir, cambiar de impresora o guardar en un archivo.

¿Hay alguna manera de lograr esto? Incluso podría arreglármelas si solo requiriera un mensaje para guardar la ubicación. El nombre del archivo que imagino podría generarse automáticamente tomando información existente dentro de la hoja de cálculo.

Respuesta1

Si está utilizando Excel 2010 y superior, Excel le proporciona un complemento interno que le permite guardar el archivo en formato PDF.
Utilice el siguiente código en su macro para guardar su archivo como PDF

ActiveSheet.ExportAsFixedFormat Tipo:=xlTypePDF, Nombre de archivo:= _
        "C:\Users\46506090\Desktop\Book1.pdf", Calidad:=xlQualityStandard, _
        IncludeDocProperties:=Verdadero, IgnorePrintAreas:=Falso, OpenAfterPublish:= _
        Verdadero

Aquí puedes reemplazar la ruta.C:\Usuarios\46506090\Escritorio\Libro1.pdfy nombre del archivo a tu gusto.

Editar: si tiene la intención de publicar todo el libro como PDF y no solo la hoja en la que está trabajando, simplemente reemplace ActivoHoja.ExportAsFixedFormat a activoLibro de trabajo.Exportar como formato fijo

información relacionada