Come utilizzare VBA per aprire e stampare un file PDF

February 2

Come utilizzare VBA per aprire e stampare un file PDF


Visual Basic, Applications Edition (VBA) è il linguaggio di programmazione utilizzato con Microsoft Office per rendere le applicazioni eseguire attività dinamiche, uno dei quali è aprire e stampare i file PDF. Per eseguire questa operazione, è necessario una conoscenza di base del linguaggio VBA e l'editor VBA che viene installato con tutte le versioni dei programmi di Microsoft Office. Questo codice può essere utilizzato per una delle applicazioni di Microsoft Office.

istruzione

1 Aprire l'editor VBA nell'applicazione di Microsoft Office che si desidera che il codice da inserire in. Clicca su \ "File \"> \ "Strumenti \"> \ "Macro \"> \ "Visual Basic Editor \" in un'applicazione di Microsoft Office 2003 o versioni precedenti. Clicca su \ "Sviluppatore scheda \"> \ "Visual Basic \" nella edizione 2007 di Microsoft Office.

2 Fare clic in qualsiasi punto della finestra del codice in cui si desidera inserire il codice.

3 Aggiungere il codice per aprire il file PDF. È il codice dovrebbe essere simile a questo:

OpenPDF Sub ()

Dim strPDFFileName As String
'Edit to add the full filename to the PDF file that you want to open
strPDFFileName = \"C:\\examplefile.pdf\"
'This next function checks to see if the file isn't already open
If Not FileLocked(strPDFFileName) Then
'If it returns False, then continue opening the PDF file
Documents.Open strPDFFileName)

Finisci se
End Sub

Copia e incolla questo codice nella finestra di codice. L'unica parte del codice che è necessario cambiare è il percorso completo del file PDF che si desidera aprire. Quindi, sostituire il \ "C: \ examplefile.pdf \" con il proprio percorso e il nome.

4 Aggiungere il codice per stampare il file PDF. Il codice di stampa è:

PrintPDF secondaria (strPDFFileName come stringa)

Dim sAdobeReader as String
'This is the full path to the Adobe Reader or Acrobat application on your computer
sAdobeReader = \"C:\\Program Files\\Adobe\\Acrobat 6.0\\Reader\\AcroRd32.exe\"
RetVal = Shell(sAdobeReader & \"/P\" & Chr(34) & sStrPDFFileName & Chr(34), 0)

End Sub

L'unica parte di questo codice che deve essere cambiato è il percorso completo per Adobe Reader, Acrobat o qualsiasi lettore di PDF sul computer.

5 Utilizzare un trigger per chiamare le funzioni. Questo è il modo in cui il codice saprà quando da eseguire. Utilizzare qualsiasi innesco che vuoi; una forma, pulsante, casella di controllo o un altro elemento modulo. Ad esempio, utilizzare il \ "Clicca \" dichiarazione di un pulsante. Quando il pulsante viene premuto, il documento PDF si aprirà e quindi stampare. Il codice è simile al seguente:

Sub CommandButton_Click ()

'Call the open function first so that the PDF can open before printing
Call OpenPDF
'Now call the print function so that the PDF can be printed
Call PrintPDF

End Sub

Basta copiare la parte centrale del codice di cui sopra (tra il Sub e End Sub) nella voce di modulo e innescare si decide di utilizzare.

Consigli e avvertenze

  • Se si utilizza la versione 2007 e non si vede la scheda \ "Sviluppatore \", cliccare sul pulsante \ "Office \" e poi la \ "Opzioni \" nella parte inferiore del menu. Clicca su \ "Mostra scheda Sviluppo sulla barra multifunzione \" e fare clic su \ "OK \".