aprire l'editor di VBA con il documento in cui si desidera digitare il codice . Fare clic su "File ", poi premi "Strumenti ". Clicca su " Macro ". Hit " Visual Basic Editor ". Se si utilizzano applicazioni 2007, fare clic su " Developer ", e poi ha colpito
2
Inserisci questo codice nella finestra del codice " Visual Basic ". :
Sub OpenPDF ( ) per
Dim strPDFFileName As String
strPDFFileName = " C : \\ examplefile.pdf "
( ' la prossima funzione controlla se il file non è già aperto ) per
Se non FileLocked ( strPDFFileName ) poi
( Se restituisce false , quindi continuare ad aprire il file PDF ) per
Documents.Open strPDFFileName ) per
End If
End Sub
Modifica " strPDFFileName " aggiungere il nome del file completo del file PDF che si desidera aprire. Sostituire " C : \\ examplefile.pdf ." Con il percorso della posizione effettiva del documento PDF
3
Digitare il codice per la preparazione di stampare il PDF :
Sub PrintPDF ( strPDFFileName come stringa ) per
Dim sAdobeReader come String
sAdobeReader = "C: \\ Programmi \\ Adobe \\ Acrobat 6.0 \\ Reader \\ AcroRd32.exe "
RetVal = Shell ( sAdobeReader & " /P " & Chr ( 34) & sStrPDFFileName & Chr ( 34 ) , 0 ) per
End Sub
modificare il percorso in questo codice della " . Adobe Reader "per il percorso effettivo della vostra versione
4
Inserisci il codice per attivare il vostro PDF da stampare :
Sub CommandButton_Click ( ) per
Chiama OpenPDF
Chiama PrintPDF
End Sub
software © www.354353.com