מתי נשתמש ב WITH

לעתים קרובות אנו נדרשים לבצע פעולות רבות על אותו הטווח.
במקרה זה, נוכל לכתוב מאקרו כדוגמת המאקרו הבא, אשר מבצע ארבע פעולות שונות על התא A1:

Range("a1").Interior.Color = vbYellow
Range("a1").Font.Bold = True
Range("a1").Font.Color = vbRed
Range("a1").Value = Range("a1").Value * 2

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

תחביר:

With Object
.command
.command
End With

שימו לב לנקודה (.) בתחילת כל שורת פקודה.

With Range("a1")
.Interior.Color = vbYellow
.Font.Bold = True
.Font.Color = vbRed
.Value = Range("a1").Value * 2
End With

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

רוצים ללמוד VBA מספר? לחצו כאן

מעוניינים ללמוד בנוחות ביתכם בקורס מקוון? לחצו כאן