Programovanie
Visual Basic for Applications (VBA) je programovací jazyk používaný s balíkom Microsoft Office, aby aplikácie vykonávali dynamické úlohy, z ktorých jednou je otváranie a tlač súborov PDF. Na vykonanie tejto úlohy potrebujete základné znalosti jazyka VBA a editora VBA, ktorý sa dodáva s každou verziou programov balíka Microsoft Office. Tento kód možno použiť pre ktorúkoľvek z aplikácií balíka Microsoft Office.
Krok 1
Otvorte editor VBA v aplikácii Microsoft Office, do ktorej chcete zadať kód. Kliknite na „Súbor“ > „Nástroje“ > „Makrá“ > „Editor jazyka Visual Basic“ v aplikácii balíka Microsoft Office 2003 alebo staršej. Kliknite na „kartu Vývojár“ > „Visual Basic“ vo vydaní balíka Microsoft Office z roku 2007.
Video dňa
Krok 2
Kliknite kdekoľvek v okne kódu, kam chcete vložiť kód.
Krok 3
Pridajte kód na otvorenie súboru PDF. Váš kód by mal vyzerať asi takto:
Sub OpenPDF() Dim strPDFFileName As String 'Upravte, ak chcete pridať celý názov súboru do súboru PDF, ktorý chcete otvoriť strPDFFileName = "C:\examplefile.pdf" 'Ďalej funkcia skontroluje, či súbor už nie je otvorený. Open strPDFFileName) End If End Sub
Skopírujte a prilepte tento kód do okna s kódom. Jediná časť kódu, ktorú budete musieť zmeniť, je úplná cesta k súboru PDF, ktorý chcete otvoriť. Takže nahraďte "C:\examplefile.pdf" svojou vlastnou cestou a názvom súboru.
Krok 4
Ak chcete vytlačiť súbor PDF, pridajte kód. Tlačový kód je:
Sub PrintPDF (strPDFFileName as string) Dim sAdobeReader as String 'Toto je úplná cesta k aplikácii Adobe Reader alebo Acrobat na vašom počítači sAdobeReader = "C:\Program Files\Adobe\Acrobat 6.0\Reader\AcroRd32.exe" RetVal = Shell (sAdobeReader & "/P" & Chr (34) & sStrPDFFileName & Chr (34), 0) End Sub
Jediná časť tohto kódu, ktorú je potrebné zmeniť, je úplná cesta k aplikácii Adobe Reader, Acrobat alebo akejkoľvek čítačke PDF vo vašom počítači.
Krok 5
Na zavolanie funkcií použite spúšťač. Takto bude kód vedieť, kedy sa má spustiť. Použite akýkoľvek spúšťač, ktorý chcete; formulár, tlačidlo, začiarkavacie políčko alebo inú položku formulára. Napríklad použite deklaráciu tlačidla „Kliknutie“. Po kliknutí na tlačidlo sa dokument PDF otvorí a vytlačí. Kód vyzerá takto:
Sub CommandButton_Click() 'Najskôr zavolajte funkciu otvorenia, aby sa PDF mohol otvoriť pred tlačou Zavolajte OpenPDF 'Teraz zavolajte funkciu tlače, aby bolo možné vytlačiť PDF Call PrintPDF End Sub
Stačí skopírovať strednú časť vyššie uvedeného kódu (medzi Sub a End Sub) do položky formulára a spustiť, ktorý sa rozhodnete použiť.
Veci, ktoré budete potrebovať
Aplikácia balíka Microsoft Office
Aplikácia na čítanie PDF
Tip
Ak používate verziu 2007 a nevidíte kartu „Vývojár“, kliknite na tlačidlo „Kancelária“ a potom na tlačidlo „Možnosti“ v spodnej časti ponuky. Kliknite na „Zobraziť kartu Vývojár na páse s nástrojmi“ a kliknite na „OK“.
