Innhold
Visual Basic for Applications (VBA) er programmeringsspråket som brukes av Microsoft Office for applikasjoner til å utføre dynamiske oppgaver som å åpne og skrive ut PDF-filer. For å oppnå dette, trenger du grunnleggende kunnskap om språket og VBA-editoren, som er installert i alle versjoner av Microsoft Office-programmer. Denne koden kan brukes til alle dine applikasjoner.
retninger
Se profil (ANSI bilde av DBX60 fra Fotolia.com)-
Åpne VBA-editoren i Office-programmet der du vil skrive inn koden. Gå til "Fil ", deretter "Verktøy", deretter "Makroer" og til slutt "Visual Basic Editor" i en versjon av Microsoft Office 2003 eller tidligere. For 2007-utgaven, gå til "Utvikler" -fanen og klikk Visual Basic.
-
I kodevinduet klikker du der du vil skrive inn koden.
-
Legg til koden for å åpne en PDF-fil. Koden din skal se slik ut
Sub OpenPDF () Dim strPDFFileName As String 'Rediger ved å legge til hele filnavnet du vil åpne i stedet for' strPDFFileName '= "C: examplefile.pdf "' Følgende kommando kontrollerer om filen allerede er åpen: Hvis Ikke FileLocked (strPDFFileName) og deretter 'Hvis resultatet er falskt, fortsett å åpne Documents.Open filen strPDFFileName) Slutt hvis End Sub
kopier og lim inn denne koden i kodevinduet. Den eneste delen du trenger å endre, er den fullstendige banen til PDF-filen du vil åpne. Deretter erstattes "C: examplefile.pdf " med stien til filen din.
-
Koden for å skrive ut filen er
Sub PrintPDF (strPDFFileName som streng) Dim sAdobeReader as String 'Dette er hele banen til Adobe Reader eller til Acrobat på datamaskinen din sAdobeReader = "C: Program Files Adobe Acrobat 6.0 Reader AcroRd32.exe " RetVal = Shell (sAdobeReader & "/ P " & Chr (34) & sStrPDFFileName & Chr (34), 0) End Sub
Du må endre banen til PDF-leseren som den er på datamaskinen din, Programfil-mappen kan være på engelsk (Programfiler) eller ha noen indikasjon på forsiden, for eksempel (x64).
-
Bruk en trigger for å la koden vite når du skal utføre funksjonene. Bruk avtrekkeren du vil ha, et skjema, en knapp, en sjekk eller andre skjemaelementer. For eksempel, bruk knappen "" Klikk ". Når knappen klikkes, åpnes og skrives PDF-dokumentet. Koden ser slik ut:
Sub CommandButton_Click () 'Aktiver funksjonen åpen før, slik at PDF-filen åpnes før den skrives ut. OpenPDF-samtale Aktiver deretter PrintPDF Call End End Sub
Kopier midtdelen av koden ovenfor (mellom Sub og End Sub) i skjemaelementet og i utløseren som skal brukes.
tips
- Hvis du bruker 2007-versjonen av Microsoft Office, og ikke ser fanen Utvikler, klikker du på Office-knappen, klikker på "Valg", klikker "Tilpass" og velger "Vis utvikler-fanen på båndet" og klikk "OK ".
Hva du trenger
- Microsoft Office-program
- PDF-leserprogram