bilokas,
Boa Tarde!
Mande imprimir diretamente em PDF, pelo PDFCreator, por exemplo, ou por outro aplicativo gerador de PDF que esteja instalado em seu micro. Assim:
Application.ActivePrinter = "PDFCreator em Ne00:"
ExecuteExcel4Macro "PRINT(1,,,1,,,,,,,,2,""PDFCreator em Ne00:"",,TRUE,,FALSE)"
Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)
Atenciosamente
Wagner Morel
Postado : 16/01/2014 10:13 am