Zawartość
Visual Basic for Applications (VBA) to język programowania używany przez Microsoft Office dla aplikacji do wykonywania dynamicznych zadań, takich jak otwieranie i drukowanie plików PDF. Aby to osiągnąć, potrzebna jest podstawowa znajomość języka i edytor VBA, który jest zainstalowany we wszystkich wersjach programów pakietu Microsoft Office. Ten kod może być użyty w dowolnej aplikacji.
Instrukcje
Wyświetl profil (Obraz ANSI autorstwa DBX60 z Fotolia.com)-
Otwórz edytor VBA w aplikacji Office, w której wprowadzisz kod. Przejdź do „Plik”, „Narzędzia”, „Makra” i wreszcie „Edytor Visual Basic” w wersji Microsoft Office 2003 lub wcześniejszej. W wersji 2007 przejdź do karty „Deweloper” i kliknij Visual Basic.
-
W oknie kodu kliknij miejsce, w którym chcesz wprowadzić kod.
-
Dodaj kod, aby otworzyć plik PDF. Twój kod powinien wyglądać następująco
Sub OpenPDF () Dim strPDFFileName As String 'Edytuj przez dodanie pełnej nazwy pliku, którą chcesz otworzyć zamiast "strPDFFileName" = "C: examplefile.pdf"' Następujące polecenie sprawdza, czy plik jest już otwarty: Jeśli Nie FileLocked (strPDFFileName), a następnie 'Jeśli wynikiem jest False, kontynuuj otwieranie pliku Documents.Open strPDFFileName) End If End Sub
skopiuj i wklej ten kod do okna kodu. Jedyną częścią, którą musisz zmienić, jest pełna ścieżka do pliku PDF, który chcesz otworzyć. Następnie zastąp „C: plik.pdf” ścieżką do pliku.
-
Kod do wydrukowania pliku to
Sub PrintPDF (strPDFFileName jako ciąg znaków) Dim sAdobeReader jako String 'To jest pełna ścieżka do Adobe Reader lub Acrobat na twoim komputerze sAdobeReader =' C: Program files Adobe Acrobat 6.0 Reader AcroRd32.exe RetVal = Shell (sAdobeReader & "/ P" i Chr (34) & sStrPDFFileName & Chr (34), 0) End Sub
Musisz zmienić ścieżkę czytnika PDF tak, jak jest na komputerze, folder Program Files może być w języku angielskim (Program Files) lub mieć pewne oznaczenia z przodu, takie jak (x64).
-
Użyj spustu, aby kod wiedział, kiedy wykonywać funkcje. Użyj żądanego wyzwalacza, formularza, przycisku, czeku lub innych elementów formularza. Na przykład użyj przycisku „Kliknij”. Po kliknięciu przycisku dokument PDF zostanie otwarty i wydrukowany. Kod wygląda tak:
Sub CommandButton_Click () 'Włącz funkcję otwarcia przed, aby plik PDF został otwarty przed wydrukowaniem połączenia OpenPDF Następnie włącz funkcję PrintPDF Call End Sub
Skopiuj środkową część powyższego kodu (pomiędzy Sub i End Sub) w elemencie formularza iw wyzwalaczu, który zostanie użyty.
Jak
- Jeśli używasz wersji pakietu Microsoft Office 2007 i nie widzisz karty „Deweloper”, kliknij przycisk Office, kliknij „Opcje”, kliknij „Dostosuj” i wybierz „Pokaż kartę Deweloper na Wstążce” i kliknij „OK”.
Czego potrzebujesz
- Program Microsoft Office
- Program do odczytu plików PDF