Најважните изјави за услови што се користат во Excel VBA се изјавите Ако тогаш и Изберете случај. И двата израза тестираат еден или повеќе услови и, во зависност од резултатот, вршат различни дејства. За овие два условни оператори ќе зборуваме подетално понатаму.
Изјава „Ако… Тогаш“ во Visual Basic
Оператор Ако тогаш ја проверува состојбата и, ако е точно (ВИСТИНА), тогаш се врши наведениот сет на дејства. Исто така, може да дефинира збир на дејства што треба да се извршат ако состојбата е FALSE.
Синтакса на операторот Ако тогаш како ова:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
Во овој израз елементите ДругоАко и друго услови операторот може да се изостави ако тие не се потребни.
Подолу е пример во кој, користејќи го операторот Ако тогаш Бојата на полнење на активната ќелија се менува во зависност од вредноста во неа:
Ако ActiveCell.Value < 5 Потоа ActiveCell.Interior.Color = 65280 'Јееееееееееееееее во зеленый цвет ElseIf ActiveCell.Value < 10 Потоа ActiveCell.Interior.Color = 49407 'Крана. Боја = 255 'Ячейка окрашивается в красный цвет Крај Ако
Забележете дека штом условот стане вистинит, извршувањето на условната изјава се прекинува. Затоа, ако вредноста на променливата ActiveCell помалку од 5, тогаш првиот услов станува вистинит и ќелијата е обоена со зелена боја. После тоа, извршувањето на изјавата Ако тогаш се прекинува и не се проверуваат другите услови.
Дознајте повеќе за користење на условниот оператор во VBA Ако тогаш може да се најде на мрежата за програмери на Microsoft.
Изјава „Избери случај“ во Visual Basic
Оператор Изберете случај слично на операторот Ако тогаш со тоа што ја проверува и вистинитоста на состојбата и, во зависност од резултатот, избира една од опциите.
Синтакса на операторот Изберете случај како ова:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
Елемент Случај друг не е потребен, но се препорачува за ракување со неочекувани вредности.
Во следниот пример, користејќи ја конструкцијата Изберете случај ја менува бојата на полнење на тековната ќелија во зависност од вредноста во неа:
Изберете Case ActiveCell.Value Case Is <= 5 ActiveCell.Interior.Color = 65280 'Ячейка окрашивается во зелёный Case 6, 7, 8, 9 ActiveCell.Interior.Color = 49407 'Краиошиваже10 Внатрешност. Боја = 65535 'Окрашина во жёлтый цвет Case 11 To 20 ActiveCell.Interior.Color = 10498160 Крај Избери
Примерот погоре покажува како можете да поставите вредност за елемент на различни начини. случај во градежништвото Изберете случај. Ова се начините:
Случај е <= 5 | Така, користејќи го клучниот збор Случај е можете да проверите дали вредноста задоволува Изрази состојба на формата <= 5. |
случај 6, 7, 8, 9 | На овој начин можете да проверите дали вредноста се совпаѓа Изрази со една од наведените вредности. Наведените вредности се одделени со запирки. |
случај 10 | Ова проверува дали вредноста се совпаѓа Изрази со дадена вредност. |
случај 11 Тоа е тоа 20 | Така, можете да напишете израз за да проверите дали вредноста задоволува Изрази состојба на формата од 11 да 20 (еквивалент на неравенката „11<=вредност<=20“). |
Случај друг | Вака, користејќи го клучниот збор друго, дејствата се означени за случајот ако вредноста Изрази не одговара на ниту една од наведените опции случај. |
Штом се најде еден од условите, се вршат соодветните дејства и структурата излегува. Изберете случај. Тоа е, во секој случај, само една од наведените гранки ќе биде извршена. случај.
Повеќе информации за работата на изјавата VBA Изберете случај може да се најде на мрежата за програмери на Microsoft.