Hvordan skrive ut en PDF ved hjelp av VBA

Hvordan skrive ut en PDF ved hjelp av VBA


Visual Basic Applications (VBA) er utviklet av Microsoft bruke Visual6 programmeringsspråk. Det ble opprettet for utviklere å aktivere brukerdefinerte funksjoner og automatisere prosesser. Den kan brukes til å opprette et Word-dokument fra Excel og vice versa, som det er innebygd i Microsoft Office-programmer. Du kan bruke VBA til å skrive ut PDF-filer, hvis du forstår VBA språk og redaktør.

Bruksanvisning

1 Åpne VBA editor med dokumentet som du ønsker å skrive koden. Klikk på "File" og deretter trykke "Tools". Klikk på "Makroer". Hit "Visual Basic Editor." Hvis du bruker 2007-programmer, klikk på "Utvikler" og deretter trykke "Visual Basic."

2 Skriv inn denne koden inn i koden vinduet:

Sub OpenPDF ()

Dim strPDFFileName As String

strPDFFileName = "C: \ examplefile.pdf"

( 'Denne neste funksjonen sjekker om filen ikke allerede er åpen)

Hvis ikke FileLocked (strPDFFileName) Deretter

(Hvis den gir False, og deretter fortsette å åpne PDF-fil)

Documents.Open strPDFFileName)

Slutt om

End Sub

Edit "strPDFFileName" legge hele filnavnet til PDF-filen du vil åpne. Erstatt "C: \ examplefile.pdf" med den faktiske plasseringen banen til PDF-dokumentet.

3 Skriv inn denne koden for å forberede seg til å skrive ut PDF:

Sub PrintPDF (strPDFFileName som streng)

Dim sAdobeReader som String

sAdobeReader = "C: \ Program Files \ Adobe \ Acrobat 6.0 \ Reader \ AcroRd32.exe"

RetVal = Shell (sAdobeReader & "/ P" & Chr (34) og sStrPDFFileName & Chr (34), 0)

End Sub

Endre banen i denne koden av "Adobe Reader" til selve banen til versjon.

4 Skriv inn denne koden for å utløse PDF til print:

Sub CommandButton_Click ()

Call OpenPDF

Call PrintPDF

End Sub