Visual Basic for Applications (VBA) é a linguagem de programação usada com o Microsoft Office para fazer as aplicações de executar tarefas dinâmicas, um dos quais é de abertura e imprimir arquivos PDF. Para executar esta tarefa , é necessário um conhecimento básico da linguagem VBA eo 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. Coisas que você precisa
A aplicação
aplicativo leitor de PDF Microsoft Office
Show Mais instruções
1
Abra o editor do VBA no aplicativo do Microsoft Office que você deseja que o código a ser celebrado . Clique em " Arquivo"> "Ferramentas" > "Macros" > " Editor do Visual Basic " em um aplicativo do Microsoft Office 2003 ou anterior. Clique em " guia Desenvolvedor "> " Visual Basic ", na edição do Microsoft Office 2007.
2
Clique em qualquer lugar na janela de código onde você deseja inserir o código.
3
Adicione o código para abrir o arquivo PDF. Você código deve ser algo como isto :
Sub OpenPDF () Dim strPDFFileName Como String'Edit para adicionar o nome do arquivo completo para o arquivo PDF que deseja openstrPDFFileName = " C: \\ examplefile.pdf " ' Esta próxima função verifica se o arquivo não estiver openIf não FileLocked ( strPDFFileName ) Then'If ele retorna False, em seguida, continuar abrindo o PDF fileDocuments.Open strPDFFileName ) End Sub IfEnd
Copie e cole este código em seu janela de código . A única parte do código que você vai precisar para mudar é o caminho completo para o arquivo PDF que deseja abrir . Então , substitua o " C: \\ examplefile.pdf " com o seu próprio caminho e nome do arquivo
4
Adicione o código para imprimir o arquivo PDF. . O código de impressão é :
Sub PrintPDF ( strPDFFileName como string) Dim sAdobeReader como String'This é o caminho completo para o aplicativo Adobe Reader ou o Acrobat em seu computersAdobeReader = "C: \\ Arquivos de Programas \\ Adobe \\ Acrobat 6.0 \\ Leitor \\ AcroRd32.exe " RetVal = Shell ( sAdobeReader &" /P "& Chr (34 ) & sStrPDFFileName & Chr (34) , 0) End Sub
A única parte desse código que precisa ser alterado é o caminho completo para o Adobe reader, Acrobat ou qualquer leitor de PDF em seu computador.
5
Use um gatilho para chamar as funções . É assim que o código vai saber quando para executar. Use tudo o gatilho que você quer, uma forma , botão, caixa ou outro item de formulário . Por exemplo, use a declaração de "Click" de um botão. Quando o botão é clicado , o documento PDF será aberto e , em seguida, imprimir. O código fica assim:
Sub CommandButton_Click () ' Chama a função aberto primeiro para que o PDF pode abrir antes printingCall OpenPDF'Now chamar a função de impressão para que o PDF pode ser printedCall PrintPDFEnd Sub
Basta copiar a parte do meio do código acima ( entre o Sub e End Sub ) para o item de formulário e acionar você decidir usar .