הצהרות מצב ב-VBA

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

הצהרת "אם...אז" ב-Visual Basic

מַפעִיל אם... אז בודק את התנאי, ואם הוא נכון (TRUE), אז מבוצעת קבוצת הפעולות שצוינה. זה יכול גם להגדיר קבוצה של פעולות שיש לבצע אם התנאי הוא FALSE.

תחביר מפעיל אם... אז ככה:

If Условие1 Then

   Действия в случае, если выполняется Условие1

ElseIf Условие2 Then

   Действия в случае, если выполняется Условие2

Else

   Действия в случае, если не выполнено ни одно из Условий

End If

בביטוי הזה, האלמנטים אחרת и אחר ניתן להשמיט את מפעיל התנאים אם אין בהם צורך.

להלן דוגמה שבה, באמצעות האופרטור אם... אז צבע המילוי של התא הפעיל משתנה בהתאם לערך שבו:

אם ActiveCell.value <5 ואז activeCell.Interior.color = 65280 'ччч о else else else з з з з з з з activ activ activ з з з з з з з з з з з з з з з activ ч activ ч activ activ activ j -зё з з з з з з з з з j then окрашивается в красный цвет סוף אם

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

למידע נוסף על השימוש באופרטור המותנה ב-VBA אם... אז ניתן למצוא ברשת המפתחים של Microsoft.

הצהרת "בחר מקרה" ב-Visual Basic

מַפעִיל בחר מקרה דומה למפעיל אם... אז בכך שהוא גם בודק את אמיתות התנאי ובהתאם לתוצאה בוחר באחת מהאפשרויות.

תחביר מפעיל בחר מקרה ככה:

Select Case Выражение

Case Значение1

   Действия в случае, если результат Выражения соответствует Значению1

Case Значение2

   Действия в случае, если результат Выражения соответствует Значению2

...

Case Else

   Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения

End Select

אֵלֵמֶנט מקרה אחר אינו נדרש, אך מומלץ לטיפול בערכים בלתי צפויים.

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

בחר מקרה ActiveCell.value הוא <= 5 activeCell.Interior.color = 65280 'чейа орашивае з зеёный ц ц ц з з з з з з з з з з з з з case case case activ activ j -зinter з з з з з з з з activ activ activ activ j -з з з з, з з, ч з, COLOR = 6 'чеча орашивае жё жё жё ц ц ц ц ц жё жё ый жё жё жё жё жё жё жё жё жё жё жё activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ activ жё activ activ יהיו жё жё жё жё жё жё жё activ activ

הדוגמה שלמעלה מראה כיצד ניתן להגדיר ערך עבור אלמנט בדרכים שונות. מקרה בבניה בחר מקרה. אלו הדרכים:

מקרה הוא <= 5לפיכך, באמצעות מילת המפתח מקרה הוא אתה יכול לבדוק אם הערך מספק ביטויים מצב הטופס <= 5.
מקרה 6, 7, 8, 9כך תוכלו לבדוק אם הערך תואם ביטויים עם אחד מהערכים המפורטים. הערכים הרשומים מופרדים בפסיקים.
מקרה 10זה בודק אם הערך תואם ביטויים עם ערך נתון.
מקרה 11 זהו זה 20לפיכך, אתה יכול לכתוב ביטוי כדי לבדוק אם הערך עונה ביטויים מצב הטופס מ11 ל20 (שווה ערך לאי השוויון "11<=ערך<=20").
מקרה אחרככה, באמצעות מילת המפתח אחר, פעולות מסומנות עבור המקרה אם הערך ביטויים אינו תואם לאף אחת מהאפשרויות המפורטות מקרה.

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

מידע נוסף על פעולת הצהרת VBA בחר מקרה ניתן למצוא ברשת המפתחים של Microsoft.

השאירו תגובה