Programowanie
Visual Basic for Applications (VBA) to język programowania używany z pakietem Microsoft Office, który umożliwia aplikacjom wykonywanie dynamicznych zadań, z których jednym jest otwieranie i drukowanie plików PDF. Aby wykonać to zadanie, potrzebujesz podstawowej wiedzy na temat języka VBA i edytora VBA, który jest instalowany z każdą wersją programów pakietu Microsoft Office. Ten kod może być używany do dowolnej aplikacji Microsoft Office.
Krok 1
Otwórz edytor VBA w aplikacji Microsoft Office, do której chcesz wprowadzić kod. Kliknij „Plik” > „Narzędzia” > „Makra” > „Edytor Visual Basic” w aplikacji pakietu Microsoft Office 2003 lub starszej. Kliknij „Karta programisty” > „Visual Basic” w wersji 2007 pakietu Microsoft Office.
Wideo dnia
Krok 2
Kliknij w dowolnym miejscu okna kodu, w którym chcesz wstawić kod.
Krok 3
Dodaj kod, aby otworzyć plik PDF. Twój kod powinien wyglądać mniej więcej tak:
Sub OpenPDF() Dim strPDFFileName As String 'Edytuj, aby dodać pełną nazwę pliku do pliku PDF, który chcesz otworzyć strPDFFileName = "C:\examplefile.pdf" 'Następny funkcja sprawdza, czy plik nie jest już otwarty. If Not FileLocked (strPDFFileName) Then 'Jeśli zwraca wartość False, kontynuuj otwieranie pliku PDF Documents. Otwórz strPDFFileName) End If End Sub
Skopiuj i wklej ten kod w oknie kodu. Jedyną częścią kodu, którą będziesz musiał zmienić, jest pełna ścieżka do pliku PDF, który chcesz otworzyć. Zastąp więc „C:\examplefile.pdf” własną ścieżką i nazwą pliku.
Krok 4
Dodaj kod, aby wydrukować plik PDF. Kod druku to:
Sub PrintPDF (strPDFFileName as string) Dim sAdobeReader as String 'To jest pełna ścieżka do aplikacji Adobe Reader lub Acrobat na twoim komputerze sAdobeReader = "C:\Program Files\Adobe\Acrobat 6.0\Reader\AcroRd32.exe" RetVal = Shell (sAdobeReader & "/P" & Chr (34) & sStrPDFFileName & Chr (34), 0) Napis końcowy
Jedyną częścią tego kodu, którą należy zmienić, jest pełna ścieżka do Adobe Reader, Acrobat lub dowolnego czytnika PDF na twoim komputerze.
Krok 5
Użyj wyzwalacza, aby wywołać funkcje. W ten sposób kod będzie wiedział, kiedy wykonać. Użyj dowolnego wyzwalacza; formularz, przycisk, pole wyboru lub inny element formularza. Na przykład użyj deklaracji "Click" przycisku. Po kliknięciu przycisku dokument PDF zostanie otwarty, a następnie wydrukowany. Kod wygląda tak:
Sub CommandButton_Click() 'Najpierw wywołaj funkcję open, aby plik PDF mógł zostać otwarty przed wydrukowaniem Wywołaj OpenPDF 'Teraz wywołaj funkcję drukowania, aby można było wydrukować plik PDF Wywołaj PrintPDF End Sub
Po prostu skopiuj środkową część powyższego kodu (między Sub i End Sub) do elementu formularza i wyzwalacz, którego zdecydujesz się użyć.
Rzeczy, których będziesz potrzebować
Aplikacja Microsoft Office
Aplikacja czytnika PDF
Wskazówka
Jeśli używasz wersji 2007 i nie widzisz zakładki „Programista”, kliknij przycisk „Biuro”, a następnie przycisk „Opcje” na dole menu. Kliknij „Pokaż kartę Deweloper na wstążce” i kliknij „OK”.
