Home Hardware Networking Programmazione Software Domanda Sistemi
Conoscenza Informatica >> software >> Portable Document Format >> .

Come stampare un PDF utilizzando VBA

Visual Basic Applications Edition (VBA ) progettati da Microsoft utilizzano Visual6 linguaggio di programmazione. E 'stato creato per gli sviluppatori per abilitare le funzioni definite dall'utente e automatizzare i processi . Può essere utilizzato per creare un documento Word da Excel e viceversa , come viene incorporato in applicazioni Microsoft Office . È possibile utilizzare VBA per stampare i file PDF , se si capisce il linguaggio VBA e redattore . Istruzioni
1

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