שלום וברוכים הבאים לשיעור 9 בקורס מאקרו VBA ב- Excel .

השיעור נראה כיצד לבצע פקודות

לפי תנאי מסוים

כלומר - אם תנאי מסוים מתקיים

אנחנו נבצע את הפקודות

ואם הוא לא מתקיים

אזי לא נבצע את הפקודות.

מי שמכיר את פקודת ה-IF של אקסל,

השיעור הזה בשבילו יהיה קלי קלות.

הדבר היחיד ששונה בינהם

הוא שפקודת ה-IF של VBA

יותר משוכללת, ויותר ברורה לעין

איך כותבים פקודת IF במאקרו ?

ישנן כמה אפשרויות

הצורה הכי פשוטה היא

if .... THEN .....

צורה נוספת היא

if .... then

פקודה ...

פקודה...

פקודה...

end if

ואם רוצים גם שיקרה משהו אחר

במידה והתנאי שלנו לא  התקיים

אז נכתוב בצורה הבאה

if ... then

פקודה...

פקודה....

else

פקודה....

פקודה...

end if

דוגמאות לפקודת IF במאקרו :

אם הערך של תא A1 גדול מ-50, אז תרשום בתא a2 את המילה “עובר”

if range("a1").value >50 then range("a2")="עובר"

אם הערך של תא a1 קטן מ-70

אז תציג הודעה על המסך

אחרת תמחק את תא a2

if raneg("a1").value<70 then

msgbox "הערך קטן מ-70"

else

range("a2").clear

end if

ואפשר גם לשלב משתנים,

עליהם למדנו בשיעור הקודם

אם הערך של משתנה בשם a שווה ל- “בובו”

אז תרשום את הערך הזה בתא b5

if a="בובו" then

range("b5").value = a

end if

בהצלחה!