Az Excel VBA rendelkezik az IF Akkor más konstrukcióval, amellyel több feltételt elemezhet és kódokat futtathat ezen feltételek alapján.
Egy másik hasonló konstrukció, amely lehetővé teszi több feltétel ellenőrzését, a SELECT CASE utasítás.
A Select Case akkor hasznos, ha három vagy több kívánt feltétel van. ellenőrizni. Ezt két feltétellel is használhatja (de úgy gondolom, hogy az Ezután az Egyebet könnyebb használni ezekben az esetekben).
Egy egyszerű példa, ahol az Eset kiválasztása utasítás hasznos, ha meg szeretné kapni a hallgató az általa megszerzett jegyek alapján (a bemutató későbbi példája).
Megjegyzés: Az ebben az oktatóanyagban szereplő összes példakód a VBA moduljában található.
Ez az oktatóanyag kiterjed:
Kiválasztja a kis- és nagybetűk szintaxisát
Az alábbiakban bemutatjuk a Kiválasztott eset szintaxisát az Excel-ben VBA:
Select Case Test_ExpressionCase Value_1Code Block when Test_Expression = Value_1Case Value_2Code Block when Test_Expression = Value_2Case Value_3Code Block when Test_Expression = Value_3Case ElseCode Block when none of the case conditions are metEnd Select
- Test_Expression: Ez az a kifejezés, amelynek értékét különféle esetek felhasználásával elemezzük (jobban megmagyarázzuk az alábbi példákkal).
- Feltétel_1, Feltétel_2,…: Ezeken a feltételeken tesztelik a szövegkifejezést. Ha megfelel a feltételnek, akkor az adott feltétel kódblokkja végrehajtásra kerül.
Minden használt Select Case utasításhoz az End Select utasítást kell használnia.
Megjegyzés: Amint egy feltétel teljesül, a VBA kilép a select case konstrukcióból. Tehát ha öt feltételed van, és a második feltétel teljesül, a VBA kilép az Eset kiválasztásából – és a többi feltételt nem teszteljük.
Esettanulmány-példák kiválasztása
Most hogy jobban megértsük a Select Case utasítás használatát a VBA-ban, nézzünk át néhány példát.
Ne feledje, hogy a bemutatóban szereplő legtöbb példa a koncepció magyarázatára szolgál. Lehetséges, hogy nem ez a legjobb módja a munka elvégzésének.
Kezdjük egy egyszerű példával, hogy a Select Case lehetővé teszi-e a feltételek ellenőrzését.
1. példa – Ellenőrizze a számokat
Az alábbi példában a kód arra kéri a felhasználót, hogy adjon meg bármilyen számot 1 és 5 között, majd megjelenik egy üzenetmező a felhasználó által megadott számmal.
Sub CheckNumber()Dim UserInput As IntegerUserInput = InputBox("Please enter a number between 1 and 5")Select Case UserInputCase 1MsgBox "You entered 1"Case 2MsgBox "You entered 2"Case 3MsgBox "You entered 3"Case 4MsgBox "You entered 4"Case
read more