תוכן העניינים
להלן נבחן תוכנית ב Excel VBA זֶה יוצר כותרת תחתונה לפני ההדפסה חוברת עבודה.
צור אירוע חוברת עבודה לפני הדפסה. הקוד שנוסף לאירוע חוברת העבודה BeforePrint יבוצע על ידי Excel VBA לפני שתדפיס חוברת עבודה.
1. פתח את עורך Visual Basic.
2. לחץ פעמיים על חוברת עבודה זו בסייר הפרויקטים.
3. בחר בחוברת העבודה מהרשימה הנפתחת השמאלית. בחר BeforePrint מהרשימה הנפתחת הימנית.
4. ליצירת כותרת תחתונה, הוסף את שורת הקוד הבאה לאירוע חוברת העבודה לפני הדפסה:
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
הערה: האובייקט PageSetup מכיל את כל תכונות הגדרת הדף (תחתון שמאלי, שוליים תחתונים, גודל נייר, שוליים שמאל וכן הלאה) כנכסים.
5. בדוק את התוכנית על ידי הדפסת חוברת העבודה שלך.
תוֹצָאָה:
