Tärkeimmät Excel VBA:ssa käytetyt ehtolausekkeet ovat lausekkeet Jos sitten и Valitse Case. Molemmat lausekkeet testaavat yhtä tai useampaa ehtoa ja suorittavat tuloksesta riippuen erilaisia toimintoja. Puhumme näistä kahdesta ehdollisesta operaattorista tarkemmin seuraavaksi.
"Jos…niin" -lause Visual Basicissa
operaattori Jos sitten tarkistaa ehdon ja jos se on tosi (TRUE), määritetty toimintosarja suoritetaan. Se voi myös määrittää joukon toimintoja, jotka suoritetaan, jos ehto on EPÄTOSI.
Operaattorin syntaksi Jos sitten kuten tämä:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
Tässä lausekkeessa elementit Muuten jos и muu ehtojen operaattori voidaan jättää pois, jos niitä ei tarvita.
Alla on esimerkki, jossa käytetään operaattoria Jos sitten Aktiivisen solun täyttöväri muuttuu sen arvon mukaan:
Jos ActiveCell.Value <5, sitten ActiveCell.Interior.Color = 65280 '' зейа орашивае yhteyttä окрашивается в красный цвет Lopeta jos
Huomaa, että heti kun ehto täyttyy, ehdollisen lauseen suoritus keskeytyy. Siksi, jos muuttujan arvo ActiveCell alle 5, niin ensimmäinen ehto toteutuu ja solu on vihreä. Sen jälkeen lausunnon täytäntöönpano Jos sitten keskeytyy ja muita ehtoja ei tarkisteta.
Lue lisää ehdollisen operaattorin käyttämisestä VBA:ssa Jos sitten löytyy Microsoft Developer Networkista.
"Valitse tapaus" -lauseke Visual Basicissa
operaattori Valitse Case samanlainen kuin operaattori Jos sitten sikäli, että se tarkistaa myös ehdon totuuden ja valitsee tuloksesta yhden vaihtoehdoista.
Operaattorin syntaksi Valitse Case kuten tämä:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
Elementti Tapaus Muu ei vaadita, mutta sitä suositellaan odottamattomien arvojen käsittelyyn.
Seuraavassa esimerkissä konstruktia käyttämällä Valitse Case muuttaa nykyisen solun täyttöväriä sen arvon mukaan:
Valitse tapaus ActiveCell.Value -tapaus on <= 5 ActiveCell.Interior.Color = 65280 'чейа орашиваетс зеёный цет tapaus 6, 7, 8, 9 ActiveCell.Interior.Color = 49407' ч, ч. Väri = 10 'чейа орашиваетс в жёыйеÄ 65535–11 ActiveCell.Interior.Color = 20' чейа оррашиваетсcolor рыйыйыйыйыйыйыйыйый [р ... ц ... ц ... ц рыйаыйааа [р ... ц р ... ц р р р р р р р р р р р р р р р р р р р р р [р,
Yllä oleva esimerkki näyttää, kuinka voit asettaa arvon elementille eri tavoilla. tapaus rakenteilla Valitse Case. Nämä ovat tapoja:
Tapaus on <= 5 | Siis käyttämällä avainsanaa Tapaus on voit tarkistaa, onko arvo tyydyttävä expressions lomakkeen kunto <= 5. |
tapaus 6, 7, 8, 9 | Näin voit tarkistaa, vastaako arvo expressions jollakin luetelluista arvoista. Luetteloarvot on erotettu pilkuilla. |
tapaus 10 | Tämä tarkistaa, vastaako arvo expressions tietyllä arvolla. |
tapaus 11 Se siitä 20 | Voit siis kirjoittaa lausekkeen tarkistaaksesi, täyttääkö arvo expressions lomakkeen kunto alkaen 11 ja 20 (vastaa epäyhtälöä "11<=arvo<=20"). |
Tapaus Muu | Näin, käyttämällä avainsanaa muu, toiminnot ilmoitetaan siinä tapauksessa, että arvo expressions ei vastaa mitään listatuista vaihtoehdoista tapaus. |
Heti kun jokin ehdoista löytyy, vastaavat toiminnot suoritetaan ja rakenne poistuu. Valitse Case. Eli joka tapauksessa vain yksi luetelluista haaroista suoritetaan. tapaus.
Lisätietoja VBA-lauseen toiminnasta Valitse Case löytyy Microsoft Developer Networkista.