Najvažniji izrazi uslova koji se koriste u Excel VBA su izrazi Ako onda и Odaberite Case. Oba ova izraza testiraju jedan ili više uslova i, ovisno o rezultatu, izvode različite radnje. U nastavku ćemo detaljnije govoriti o ova dva uvjetna operatora.
Naredba “Ako… Onda” u Visual Basicu
operator Ako onda provjerava uvjet i, ako je istinit (TRUE), tada se izvodi navedeni skup akcija. Također može definirati skup radnji koje će se izvršiti ako je uvjet FALSE.
Sintaksa operatora Ako onda Volim ovo:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
U ovom izrazu, elementi elseif и drugo Operator uslova se može izostaviti ako nisu potrebni.
Ispod je primjer u kojem se koristi operator Ako onda Boja ispune aktivne ćelije mijenja se ovisno o vrijednosti u njoj:
Ako je ActiveCell.Value < 5 Tada ActiveCell.Interior.Color = 65280 'Âčejka okrašava se u zelënyj cvet ElseIf ActiveCell.Value < 10 Tada ActiveCell.Interior.Color = 49407 'Âčejka.Interior.Color = 255 'Âčejka.Interior.Color = XNUMX 'Âčejka. okrasivaetsâ v krasnyj cvet End If
Imajte na umu da čim uslov postane istinit, izvršenje uslovnog izraza se prekida. Stoga, ako je vrijednost varijable ActiveCell manje od 5, tada prvi uslov postaje istinit i ćelija je obojena zelenom bojom. Nakon toga, izvršenje izjave Ako onda je prekinut i ostali uslovi nisu provjereni.
Saznajte više o korišćenju uslovnog operatora u VBA Ako onda možete pronaći na mreži Microsoft Developer Network.
Naredba "Select Case" u Visual Basicu
operator Odaberite Case slično operateru Ako onda u tome što također provjerava istinitost uvjeta i, ovisno o rezultatu, bira jednu od opcija.
Sintaksa operatora Odaberite Case Volim ovo:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
element Case Else nije potrebno, ali se preporučuje za rukovanje neočekivanim vrijednostima.
U sljedećem primjeru, koristeći konstrukciju Odaberite Case mijenja boju ispune trenutne ćelije u zavisnosti od vrijednosti u njoj:
Odaberi Case ActiveCell.Value Case Is <= 5 ActiveCell.Interior.Color = 65280 'Jačejka okrašivaetsâ u zelënyj cvet Case 6, 7, 8, 9 ActiveCell.Interior.Color = 49407 'Âčejka okrašava se u narandžastom cvetu Casell 10 Boja = 65535 'Jačejka okrašiva se u žutoj boji Case 11 do 20 ActiveCell.Interior.Color = 10498160 'Jačejka okrašiva se u lilovom boju Case Else ActiveCell.Interior.Color = 255 'Jačejka okrašava se u crvenu boju End okrašava Select
Gornji primjer pokazuje kako možete postaviti vrijednost za element na različite načine. slučaj u građevinarstvu Odaberite Case. Ovo su načini:
| Case Is <= 5 | Dakle, koristeći ključnu riječ Case Is možete provjeriti da li vrijednost zadovoljava Izrazi stanje forme <= 5. |
| slučaj 6, 7, 8, 9 | Na ovaj način možete provjeriti da li se vrijednost podudara Izrazi sa jednom od navedenih vrijednosti. Navedene vrijednosti su odvojene zarezima. |
| slučaj 10 | Ovo provjerava da li se vrijednost podudara Izrazi sa zadatom vrednošću. |
| slučaj 11 To je to 20 | Dakle, možete napisati izraz da provjerite da li vrijednost zadovoljava Izrazi stanje forme od 11 do 20 (ekvivalentno nejednakosti "11<=value<=20"). |
| Case Else | Ovako, koristeći ključnu riječ drugo, akcije su naznačene za slučaj ako je vrijednost Izrazi ne odgovara nijednoj od navedenih opcija slučaj. |
Čim se pronađe jedan od uslova, izvode se odgovarajuće radnje i struktura izlazi. Odaberite Case. To jest, u svakom slučaju, samo jedna od navedenih grana će biti izvršena. slučaj.
Više informacija o radu VBA naredbe Odaberite Case možete pronaći na mreži Microsoft Developer Network.