Programação
Visual Basic for Applications (VBA) é a linguagem de programação usada com o Microsoft Office para fazer com que os aplicativos executem tarefas dinâmicas, uma das quais é abrir e imprimir arquivos PDF. Para executar esta tarefa, você precisa de um conhecimento básico da linguagem VBA e do editor VBA que vem instalado com todas as versões dos programas do Microsoft Office. Este código pode ser usado para qualquer um dos aplicativos do Microsoft Office.
Passo 1
Abra o editor VBA no aplicativo Microsoft Office no qual deseja que o código seja inserido. Clique em "Arquivo"> "Ferramentas"> "Macros"> "Editor Visual Basic" em um aplicativo do Microsoft Office 2003 ou anterior. Clique na guia "Desenvolvedor"> "Visual Basic" na edição 2007 do Microsoft Office.
Vídeo do dia
Passo 2
Clique em qualquer lugar da janela de código onde deseja inserir o código.
etapa 3
Adicione o código para abrir o arquivo PDF. Seu código deve ser semelhante a este:
Sub OpenPDF () Dim strPDFFileName As String 'Editar para adicionar o nome do arquivo completo ao arquivo PDF que você deseja abrir strPDFFileName = "C: \ examplefile.pdf"' Este próximo função verifica se o arquivo já não está aberto If Not FileLocked (strPDFFileName) Then 'Se retornar False, então continue abrindo o arquivo PDF Documentos. Abrir strPDFFileName) End If End Sub
Copie e cole este código em sua janela de código. A única parte do código que você precisa alterar é o caminho completo para o arquivo PDF que deseja abrir. Portanto, substitua "C: \ examplefile.pdf" pelo seu próprio caminho e nome de arquivo.
Passo 4
Adicione o código para imprimir o arquivo PDF. O código de impressão é:
Sub PrintPDF (strPDFFileName as string) Dim sAdobeReader as String 'Este é o caminho completo para o aplicativo Adobe Reader ou Acrobat em seu computador sAdobeReader = "C: \ Arquivos de programas \ Adobe \ Acrobat 6.0 \ Reader \ AcroRd32.exe" RetVal = Shell (sAdobeReader & "/ P" & Chr (34) & sStrPDFFileName & Chr (34), 0) End Sub
A única parte deste código que precisa ser alterada é o caminho completo para o Adobe Reader, Acrobat ou qualquer leitor de PDF em seu computador.
Etapa 5
Use um gatilho para chamar as funções. É assim que o código saberá quando executar. Use o gatilho que quiser; um formulário, botão, caixa de seleção ou outro item de formulário. Por exemplo, use a declaração "Clique" de um botão. Quando o botão é clicado, o documento PDF será aberto e impresso. O código é parecido com este:
Sub CommandButton_Click () 'Chame a função abrir primeiro para que o PDF possa abrir antes de imprimir Chame OpenPDF' Agora chame a função de impressão para que o PDF possa ser impresso Chame PrintPDF End Sub
Basta copiar a parte intermediária do código acima (entre Sub e End Sub) para o item de formulário e o gatilho que você decidir usar.
Coisas que você precisa
Um aplicativo do Microsoft Office
Aplicativo leitor de PDF
Dica
Se você estiver usando a versão 2007 e não encontrar a guia "Desenvolvedor", clique no botão "Office" e depois no botão "Opções" na parte inferior do menu. Clique em “Mostrar guia Desenvolvedor na faixa de opções” e clique em “OK”.