PDF24: DAR NOME E PASTA DE DESTINO DO ARQUIVO
Estou usando o PDF24 para gerar alguns relatórios em PDF, seleciono a impressora PDF24, salvo documento, crio um nome para o mesmo e seleciono uma pasta para salvar.
Eu preciso dar nome e a pasta de destino via código, alguém conhece alguma forma de fazer este procedimento?
Eu preciso dar nome e a pasta de destino via código, alguém conhece alguma forma de fazer este procedimento?
Dim pdfPrinter As Object
Dim outputPath As String
Dim fileName As String
' Defina o caminho de destino e o nome do arquivo
outputPath = "C:\MeuCaminho\"
fileName = "MeuDocumento.pdf"
' Configuração de impressora
Printer.DriverName = "PDF24"
Printer.Port = outputPath & fileName
' Imprima algo
Printer.Print "Este é um teste de impressão para PDF"
Printer.EndDoc
MsgBox "Documento salvo em " & outputPath & fileName
Dim outputPath As String
Dim fileName As String
' Defina o caminho de destino e o nome do arquivo
outputPath = "C:\MeuCaminho\"
fileName = "MeuDocumento.pdf"
' Configuração de impressora
Printer.DriverName = "PDF24"
Printer.Port = outputPath & fileName
' Imprima algo
Printer.Print "Este é um teste de impressão para PDF"
Printer.EndDoc
MsgBox "Documento salvo em " & outputPath & fileName
Alterado em 18/11/2024 16:00:14
Descupa, mas isso não funciona!
Faça seu login para responder