VBA:n kuntolausekkeet

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 <= 5Siis käyttämällä avainsanaa Tapaus on voit tarkistaa, onko arvo tyydyttävä expressions lomakkeen kunto <= 5.
tapaus 6, 7, 8, 9Näin voit tarkistaa, vastaako arvo expressions jollakin luetelluista arvoista. Luetteloarvot on erotettu pilkuilla.
tapaus 10Tämä tarkistaa, vastaako arvo expressions tietyllä arvolla.
tapaus 11 Se siitä 20Voit siis kirjoittaa lausekkeen tarkistaaksesi, täyttääkö arvo expressions lomakkeen kunto alkaen 11 ja 20 (vastaa epäyhtälöä "11<=arvo<=20").
Tapaus MuuNä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.

Jätä vastaus