קורס אקסל VBA – אירועים

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

כאשר קיים אובייקט פתוח בשטח העבודה ב-VBA, ניתן להבחין שתי תיבות בחירה בשורה העליונה של איזור העריכה. הן מסייעות בניווט בין הפקודות שנוצרו בתוך אותו אובייקט:

התיבה השמאלית – בוררת בין קטגוריות האובייקטים באותו איזור.

התיבה הימנית – בוררת בין כל הפקודות השייכות לאותו האובייקט.

תיבות הבחירה באיזורי העריכה של אובייקטים בחלונית הפרויקטים

איזור העריכה של מודול רגיל

להלן איזור העריכה ברמת מודול רגיל, כלומר אין עריכה של אובייקט ספציפי. לכן התיבה השמאלית תציג את האפשרות General בלבד:

התיבה הימנית מציגה את כל רשימת הפקודות שבאיזור זה:

אירועים באיזור העריכה של הגיליון

להלן איזור העריכה ברמת גיליון. איזור זה קשור לאובייקט ספציפי, ולכן בחלונית השמאלית, חוץ מקטגורית הפקודות הכלליות המשויכות לגיליון זה בלבד (האפשרות General), תופיע גם האפשרות Worksheet:

האפשרות Worksheet מאפשרת את הצגת את כל הפקודות הקשורות לאירועים ברמת הגיליון בתיבה הימנית:

רשימה זו מציינת אירועים מובנים ב-VBA הקשורים בגיליון, כמו אקטיבציה, מחיקה, שינוי בגיליון, לחיצה על קישור ועוד.

אירועים באיזור העריכה של חוברת העבודה

האפשרות Workbook מציגה הצגת את כל הפקודות הקשורות לאירועים ברמת חוברת העבודה בתיבה הימנית:

ברשימה זו ניתן לראות אירועים מובנים ב-VBA הקשורים החוברת עבודה, כמו פתיחה, שמירה, יצירת גיליון חדש, הדפסה ועוד

יצירת אירוע

הדוגמה הבאה מציגה יצירת אירוע ברמת חוברת העבודה. לפי קוד זה, בעת אירוע של פתיחת חוברת העבודה יקפוץ חלון MsgBox למשתמש (ר' עמ' 79):

1. יש לפתוח את איזור העריכה של חוברת העבודה באמצעות חלונית הפרויקטים.
2. יש לבחור את האפשרות Workbook בחלונית השמאלית העליונה באיזור העריכה.
3. יש לבחור את האפשרות Open בחלונית הימנית העליונה באיזור העריכה.

באופן אוטומטי יופיע מבנה קוד להפעלה באמצעות אירוע לפי המבנה הבא:

Private Sub {Event} ()

End Sub

להלן הקוד במסגרת הפקודה לאירוע הפתיחה, המציג את חלון ההודעה:

להלן חלון ה-MsgBox שיוצר קוד זה מיד עם פתיחת חוברת העבודה:

הדוגמה הבאה מציגה יצירת אירוע ברמת הגיליון. לפי קוד זה, בעת לחיצה על מקש ימני בגיליון יושמע צפצוף במחשב באמצעות הפקודה Beep:

1. יש לפתוח את איזור העריכה של גיליון רצוי באמצעות חלונית הפרויקטים.
2. יש לבחור את האפשרות Worksheet בחלונית השמאלית העליונה באיזור העריכה.
3. יש לבחור את האפשרות BeforeRightClick בחלונית הימנית העליונה באיזור העריכה.
4. להלן הקוד במסגרת הפקודה לאירוע לחיצה על מקש ימני, המשמיע צפצוף:

חשוב להזכיר שאיזור העריכה הוא של גיליון ספציפי, ולכן הפעולה הזו תתרחש רק עבור רמת הגיליון שנבחר, ולא בכל הגיליונות.