שלום וברוכים הבאים לשיעור 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
בהצלחה!