Sådan udskrives en PDF ved hjælp af VBA

Sådan udskrives en PDF ved hjælp af VBA


Visual Basic Applications (VBA) designet af Microsoft bruger Visual6 programmeringssprog. Den blev skabt for udviklere at aktivere brugerdefinerede funktioner og automatisere processer. Det kan bruges til at skabe et Word dokument fra Excel og omvendt, som det er indlejret i Microsoft Office-programmer. Du kan bruge VBA til at udskrive PDF-filer, hvis du forstår VBA sprog og redaktør.

Vejledning

1

Åbn din VBA editor med det dokument, hvori du ønsker at skrive koden. Klik på "File" og derefter hit "Tools". Klik på "Makroer". Hit "Visual Basic Editor." Hvis du bruger 2007-programmer, skal du klikke på "Udvikler" og derefter hit "Visual Basic".

2

Indtast denne kode i koden vinduet:

Sub OpenPDF ()

Dim strPDFFileName As String

strPDFFileName = "C: \ examplefile.pdf"

(»Denne næste funktion kontrollerer, om filen ikke allerede er åbent)

Hvis ikke FileLocked (strPDFFileName) Derefter

(Hvis den returnerer falsk, så fortsætte med at åbne PDF-filen)

Documents.Open strPDFFileName)

End hvis

End Sub

Edit "strPDFFileName" tilføj det fulde filnavn til PDF-fil, du vil åbne. Erstat "C: \ examplefile.pdf" med den faktiske placering stien til PDF-dokument.

3

Indtast denne kode til at forberede sig på at udskrive dit 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) & sStrPDFFileName & Chr (34), 0)

End Sub

Ændre stien i denne kode af "Adobe Reader" til den faktiske stien til version.

4

Indtast denne kode til at udløse din PDF til print:

Sub CommandButton_Click ()

Ring OpenPDF

Ring PrintPDF

End Sub


relaterade artiklar