Cele mai importante instrucțiuni de condiție utilizate în Excel VBA sunt instrucțiunile Daca atunci и Selectați cazul. Ambele expresii testează una sau mai multe condiții și, în funcție de rezultat, efectuează acțiuni diferite. Despre acești doi operatori condiționali vom vorbi în continuare mai detaliat.
Declarația „Dacă... Atunci” în Visual Basic
Operator Daca atunci verifică condiția și, dacă este adevărată (adevărată), atunci se realizează setul specificat de acțiuni. De asemenea, poate defini un set de acțiuni care trebuie efectuate dacă condiția este FALSĂ.
Sintaxa operatorului Daca atunci asa:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
În această expresie, elementele AltfelDacă и altfel condiţiile operatorului pot fi omise dacă nu sunt necesare.
Mai jos este un exemplu în care, folosind operatorul Daca atunci Culoarea de umplere a celulei active se modifică în funcție de valoarea din ea:
If ActiveCell.Value < 5 Then ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет ElseIf ActiveCell.Value < 10 Then ActiveCell.Interior.Color = 49407 'Ячейка окрашивается в оранжевый цвет Else ActiveCell.Interior.Color = 255 'Ячейка окрашивается в красный цвет End If
Rețineți că, de îndată ce condiția devine adevărată, execuția instrucțiunii condiționate este întreruptă. Prin urmare, dacă valoarea variabilei ActiveCell mai puțin de 5, atunci prima condiție devine adevărată și celula este colorată în verde. După aceea, execuția declarației Daca atunci este întreruptă și celelalte condiții nu sunt verificate.
Aflați mai multe despre utilizarea operatorului condiționat în VBA Daca atunci poate fi găsit în Microsoft Developer Network.
Declarația „Selectare caz” în Visual Basic
Operator Selectați cazul similar cu operatorul Daca atunci prin aceea că verifică și adevărul condiției și, în funcție de rezultat, alege una dintre opțiuni.
Sintaxa operatorului Selectați cazul asa:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
Element Alt caz nu este necesar, dar este recomandat pentru gestionarea valorilor neașteptate.
În exemplul următor, folosind constructul Selectați cazul schimbă culoarea de umplere a celulei curente în funcție de valoarea din ea:
Selectați cazul activecell.Value caz este <= 5 activecell.interior.color = 65280 'чейка ккрашивается велёный цвет Cazul 6, 7, 8, 9 ActiveCell.Interior.Color = 49407' agună. Color = 10 'Ячейка окрашивается в жёлтый цвет Case 65535 To 11 ActiveCell.Interior.Color = 20 'Ячейка окрашивается в лиловый цвет Case Else ActiveCell.Interior.Color = 10498160 'Ячейка окрашивается в красный цвет End Select
Exemplul de mai sus arată cum puteți seta o valoare pentru un element în diferite moduri. Caz in constructie Selectați cazul. Acestea sunt modalitățile:
| Cazul este <= Xnumx | Astfel, folosind cuvântul cheie Cazul este puteți verifica dacă valoarea satisface Expresii starea formularului <= Xnumx. |
| Caz 6, 7, 8, 9 | În acest fel puteți verifica dacă valoarea se potrivește Expresii cu una dintre valorile enumerate. Valorile enumerate sunt separate prin virgule. |
| Caz 10 | Aceasta verifică dacă valoarea se potrivește Expresii cu o valoare dată. |
| Caz 11 Asta e 20 | Astfel, puteți scrie o expresie pentru a verifica dacă valoarea este satisfăcută Expresii starea formularului de la 11 la 20 (echivalent cu inegalitatea „11<=valoare<=20”). |
| Alt caz | Astfel, folosind cuvântul cheie altfel, acțiunile sunt indicate pentru cazul în care valoarea Expresii nu se potrivește cu niciuna dintre opțiunile enumerate Caz. |
De îndată ce se găsește una dintre condiții, se efectuează acțiunile corespunzătoare și structura iese. Selectați cazul. Adică, în orice caz, doar una dintre ramurile enumerate va fi executată. Caz.
Mai multe informații despre funcționarea instrucțiunii VBA Selectați cazul poate fi găsit în Microsoft Developer Network.