„VBA Select Case“: kelių, jei kitų teiginių, alternatyva

Jei turite daug sąlygų, kurias norite patikrinti, arba norite atlikti tam tikrą operaciją pagal vartotojo pasirinkimą, galite naudoti „If Else If“ teiginius. Tačiau jie vargina, kai kalbama apie kelias sąlygas. Tokiu atveju geriausias sprendimas „Excel VBA“ yraPasirinkite Bylametodas.

Kas yra „Select Case“ pareiškimas VBA?

„VBA“ teiginio pasirinkimo atvejai yra naudingi, kai turite patikrinti kelias sąlygas. Jie yra tarsi perjungimo teiginiai kitomis programavimo kalbomis. Jis patikrina nurodytą kintamąjį ir įvykdo suderintą atvejį.

„Excel VBA“ atvejo pasirinkimo sintaksė

Pasirinkite atvejo kintamasis atvejis Sąlyga1 rezultatas1 atvejis Sąlyga2 Sąlyga2…. atvejis SąlygaN rezultatasN [atvejis kitas rezultatasElse] 

Pasirinkite atvejį:Čia Pasirinkite Byla yra raktinis žodis pradėti bylos tikrinimą.

Kintamasis: Kintamasis yra bet koks kintamasis, kurį norite patikrinti.

Byla: nuo kitos eilutės pradedame tikrinti sąlygas kintamaisiais.

Galite turėti tiek sąlygų, kiek norite. Raktiniu žodžiu galime patikrinti bet kokias sąlygas atvejis. Sąlyga gali būti loginis teiginys arba tiesi pasirinkto kintamojo vertė. Visada bus gauta tikra-klaidinga vertė. Visa tai yra teisingi teiginiai:

 Pasirinkite Byla regionas “naudojant tiesią reikšmę Byla „Centrinis“ diapazonas („D1“). Vertė = regionas, naudojant a yra teiginys Byla Ar = "Centrinis" diapazonas ("D1"). Reikšmė = regiono pabaiga Pasirinkite 

Su „ar“ galite įdėti aritmetinius loginius operatorius, kad patikrintumėte, ar atvejis yra lygus (=), didesnis nei (>), mažesnis nei (<) ir kt.

Galite naudoti kablelį („,“), kad atliktumėte vieną operaciją keliomis sąlygomis (pvz., Arba operatorius).

Atvejis yra = „Vakarai“, „Šiaurė“, „Pietų“ diapazonas („D1“). Reikšmė = regionas 

Taip pat galite naudoti operatorių To, kad patikrintumėte didelius diapazonus.

1–40 atvejis = „F“ 41–60 laipsnio atvejis = „C“ 61–80 laipsnio atvejis = „B“ atvejis 81–100 laipsnio = „A“ 

Kitų atvejų teiginys yra neprivalomas. Galite jį naudoti pagal numatytuosius nustatymus, jei nė vienas atvejis neatitinka. Kaip parodyti pranešimą, kad pasirinkimas neteisingas, ar kažkas panašaus.

Kita byla „MsgBox“ netinkama parinktis 

Dabar, kai žinome apie „Select Case“ pagrindus, pateiksime pavyzdį.

Pavyzdys: sukurkite vertinimo funkciją naudodami „VBA Select Case“

Turime sukurti funkciją, kuri patikrintų pateiktą vertę ir grąžintų pažymius pagal toliau pateiktas taisykles:

  • Jei> 41, laipsnis = "F"
  • Jei nuo 41 iki 60, klasė = "C"
  • Jei nuo 61 iki 80, klasė = "B"
  • Jei nuo 81 iki 100, klasė = "A"
  • dar #VERTĖ! klaida.

Čia naudosime „Select Case“ kaip „VBA“ teiginį. Tinkintos funkcijos kodas bus toks:

Funkcija GRADES (num As Double) Pasirinkite atvejo numerį Byla yra <41 GRADES = "F" Byla nuo 41 iki 60 GRADES = "C" Byla nuo 61 iki 80 GRADES = "B" Byla nuo 81 iki 100 GRADES = "A" Kitas atvejis GRADES = "#VERTĖ!" Pabaiga Pasirinkite pabaigos funkciją 

Dabar, jei naudosite šią funkciją lape, pažymiai bus lengvai grąžinti.

Taigi taip, vaikinai, šitaip „Select Case“ (jungiklio) sakinys naudojamas „Excel VBA“, kad būtų galima patikrinti kelias sąlygas. Vietoj daugybės „If Else If If“ teiginių mes naudojame „Select Case“ sakinį, kad pakeistume rezultatus. Jei turite kokių nors abejonių dėl šio straipsnio ar kitų su „Excel“/VBA susijusių straipsnių, paklauskite žemiau esančiame komentarų skyriuje.

Atsisiųskite žemiau esantį darbo failą:

„Loop“ naudojimas VBA programoje „Microsoft Excel“ | VBA kilpos leidžia mums pakartotinai atlikti panašią užduotį nekartojant kodo. „Excel VBA“ yra 3 tipų kilpos.

7 „Microsoft Excel VBA“ kilpų pavyzdžiai | 7 ciklo pavyzdžiai gali palengvinti jūsų automatizavimo gyvenimą. Pradėkime nuo paprastos kilpos.

Populiarūs straipsniai:

50 „Excel“ nuorodų, skirtų produktyvumui padidinti | Greičiau atlikite savo užduotį. Šie 50 sparčiųjų klavišų leis dar greičiau dirbti naudojant „Excel“.

„VLOOKUP“ funkcija „Excel“ | Tai yra viena iš dažniausiai naudojamų ir populiariausių „Excel“ funkcijų, naudojama norint ieškoti vertės iš įvairių diapazonų ir lapų.

COUNTIF „Excel 2016“ | Naudodami šią nuostabią funkciją, suskaičiuokite reikšmes su sąlygomis. Norint skaičiuoti konkrečią vertę, nereikia filtruoti duomenų. Skaitiklio funkcija yra būtina norint paruošti prietaisų skydelį.

Kaip naudoti „SUMIF“ funkciją „Excel“ | Tai dar viena esminė prietaisų skydelio funkcija. Tai padeda apibendrinti vertes konkrečiomis sąlygomis.

Padėsite svetainės plėtrą, dalintis puslapį su draugais

wave wave wave wave wave