VBD gebruiken om een PDF-bestand te openen en af te drukken

Video: Windows 11: venster Instellingen 1/2 (SchoonePC Nieuwsbrief 110)

Inhoud

routebeschrijving
tips
Wat je nodig hebt

Visual Basic for Applications (VBA) is de programmeertaal die door Microsoft Office wordt gebruikt voor toepassingen om dynamische taken uit te voeren, zoals het openen en afdrukken van PDF-bestanden. Om dit te bereiken, hebt u een basiskennis van de taal en de VBA-editor nodig, die in alle versies van Microsoft Office-programma's is geïnstalleerd. Deze code kan voor al uw applicaties worden gebruikt.

routebeschrijving

Bekijk profiel (ANSI-afbeelding door DBX60 van Fotolia.com)

Open de VBA-editor in de Office-toepassing waarin u de code invoert. Ga naar "Bestand ", vervolgens "Extra", vervolgens "Macro's" en ten slotte "Visual Basic Editor" in een versie van Microsoft Office 2003 of eerder. Ga voor de editie van 2007 naar het tabblad "Ontwikkelaar" en klik op Visual Basic.
Klik in het codevenster op de plaats waar u de code wilt invoeren.
Voeg de code toe om een PDF-bestand te openen. Uw code zou er zo uit moeten zien

Sub OpenPDF () Dim strPDFFileName As String 'Bewerken door de volledige bestandsnaam toe te voegen die u wilt openen in plaats van "strPDFFileName" = "C: examplefile.pdf "' De volgende opdracht controleert of het bestand al is geopend: if Not FileLocked (strPDFFileName) en dan 'Als het resultaat False is, open dan het bestand Documents.Open strPDFFileName) End If End Sub

kopieer en plak deze code in het codevenster. Het enige onderdeel dat u moet wijzigen, is het volledige pad van het PDF-bestand dat u wilt openen. Vervang dan "C: examplefile.pdf " door het pad van uw bestand.
De code om het bestand af te drukken is

Sub PrintPDF (strPDFFileName as string) Dim sAdobeReader as String 'Dit is het volledige pad naar Adobe Reader of naar Acrobat op uw computer sAdobeReader = "C: Program Files Adobe Acrobat 6.0 Reader AcroRd32.exe " RetVal = Shell (sAdobeReader & "/ P " & Chr (34) & sStrPDFFileName & Chr (34), 0) End Sub

U moet het pad van de PDF-lezer wijzigen zoals deze zich op uw computer bevindt, de map Program Files kan in het Engels zijn (programmabestanden) of een indicatie hebben op de voorkant, zoals (x64).
Gebruik een trigger om de code te laten weten wanneer de functies moeten worden uitgevoerd. Gebruik de gewenste trigger, een formulier, een knop, een vinkje of andere formulieritems. Gebruik bijvoorbeeld de "Click " -instructie van een knop. Wanneer op de knop wordt geklikt, wordt het PDF-document geopend en afgedrukt. De code ziet er zo uit:

Sub CommandButton_Click () 'Schakel de functie vóór openen in zodat de PDF wordt geopend voordat deze wordt afgedrukt OpenPDF-oproep Schakel vervolgens de PrintPDF-aanroep eind Sub in

Kopieer het middelste gedeelte van de bovenstaande code (tussen Sub en End Sub) in het formulieritem en in de trigger die wordt gebruikt.

tips

Als u de 2007-versie van Microsoft Office gebruikt en het tabblad "Ontwikkelaar" niet ziet, klikt u op de Office-knop, klikt u op "Opties", klikt u op "Aanpassen" en selecteert u het tabblad "Ontwikkelaar weergeven op het lint" en klik op "OK ".