כיצד להשתמש VBD לפתוח ולהדפיס קובץ PDF

וִידֵאוֹ: How to Print Excel as PDF and Open PDF file using VBA

תוֹכֶן

הוראות
איך
מה שאתה צריך

Visual Basic for Applications (VBA) היא שפת התכנות המשמשת את Microsoft Office ליישומים לביצוע משימות דינמיות, כגון פתיחה והדפסה של קבצי PDF. כדי להשיג זאת, תזדקק לידע בסיסי של השפה ועורך ה- VBA, המותקן בכל הגירסאות של תוכניות Microsoft Office. קוד זה יכול לשמש עבור כל היישומים שלך.

הוראות

צפה בפרופיל (תמונה ANSI ידי DBX60 מ Fotolia.com)

פתח את עורך ה- VBA ביישום Office שבו תזין את הקוד. עבור אל "קובץ ", ולאחר מכן "כלים", ולאחר מכן "פקודות מאקרו" ולבסוף "Visual Basic עורך" בגירסה של Microsoft Office 2003 או קודם לכן. עבור מהדורת 2007, עבור אל הכרטיסייה "מפתח" ולחץ על Visual Basic.
בחלון הקוד, לחץ במקום שבו ברצונך להזין את הקוד.
הוסף את הקוד לפתיחת קובץ PDF. הקוד שלך אמור להיראות כך

SubPDFFILEName כמערכת מחרוזת 'ערוך על-ידי הוספת שם הקובץ המלא שברצונך לפתוח במקום "strPDFFileName" = "C: examplefile.pdf "' הפקודה הבאה בודקת אם הקובץ כבר פתוח: אם לא FileLocked (strPDFFileName) ולאחר מכן 'אם התוצאה היא False, להמשיך לפתוח את הקובץ Documents.Open strPDFFileName) End End End

העתק והדבק קוד זה בחלון הקוד. החלק היחיד שאתה צריך לשנות הוא הנתיב המלא של קובץ PDF שברצונך לפתוח. לאחר מכן החלף את "C: examplefile.pdf " עם הנתיב של הקובץ.
הקוד להדפסת הקובץ הוא

SubPDFileFame (strPDFFileName כמחרוזת) עמעום sAdobeReader כמחרוזת 'זה הנתיב המלא ל- Adobe Reader או ל- Acrobat במחשב sAdobeReader = "C: Program Files Adobe Acrobat 6.0 Reader AcroRd32.exe RetVal = Shell (sAdobeReader & "/ P " & Chr (34) & sStrPDFFileName & Chr (34), 0) End Sub

עליך לשנות את הנתיב של קורא PDF כפי שהוא נמצא במחשב שלך, התיקייה Program Files עשויה להיות באנגלית (Program Files) או שיש לך אינדיקציה כלשהי בחזית, כגון (x64).
השתמש בהדק כדי לאפשר לקוד לדעת מתי לבצע את הפונקציות. השתמש בהדק הרצוי, בטופס, בלחצן, בהמחאה או בפריטי טופס אחרים. לדוגמה, השתמש בלחצן "לחץ " על לחצן. כאשר לוחצים על הלחצן, מסמך PDF ייפתח ויודפס. הקוד נראה כך:

SubButton_Click () 'הפעל את הפונקציה לפני הפונקציה כך ש - PDF ייפתח לפני שיודפסו OpenPDF Call לאחר מכן, הפעל את PrintPDF Call End Sub

העתק את החלק האמצעי של הקוד לעיל (בין Sub ו- End Sub) בפריט הטופס ובגורם ההפעלה שישמש.

איך

אם אתה משתמש בגירסת 2007 של Microsoft Office ואינך רואה את הכרטיסייה "מפתח", לחץ על הלחצן Office, לחץ על "אפשרויות", לחץ על "התאמה אישית" ובחר את "הצג את הכרטיסייה מפתח על רצועת הכלים" ולחץ על "אישור ".