Lang L: none (table-of-contents)
Mitme If Siis väite asemel Exceli VBA, saate kasutada Valige Juhtumi struktuur.
Olukord:
Asetage oma töölehele käsunupp ja lisage järgmised koodiridad:
1. Esiteks deklareerige kaks muutujat. Üks Integer tüüpi muutuja nimega skoor ja üks tüüp String nimega tulemus.
Tuhm skoor täisarvuna, tulemus stringina
2. Initsialiseerime muutuja skoori lahtri A1 väärtusega.
skoor = vahemik ("A1"). Väärtus
3. Lisage struktuur Vali juhtum.
Valige juhtumi skoor
Juhtum on> = 80
tulemus = "väga hea"
Juhtum on> = 70
tulemus = "hea"
Juhtum on> = 60
tulemus = "piisav"
Juhtum muidu
tulemus = "ebapiisav"
Lõpp Vali
Selgitus: Excel VBA kasutab muutuva skoori väärtust iga järgneva juhtumilause testimiseks, et näha, kas juhtumilause all olev kood tuleks täita.
4. Kirjutage muutuva tulemuse väärtus lahtrisse B1.
Vahemik ("B1"). Väärtus = tulemus
5. Testige programmi.
Tulemus, kui klõpsate lehel käsunuppu:
Märkus. Excel VBA täidab teise juhtumilause all oleva koodi kõigi väärtuste puhul, mis on suuremad või võrdsed kui 70 ja alla 80.