VBA kapcsoló funkció - Hogyan kell használni a kapcsoló funkciót?

Excel VBA kapcsoló funkció

A VBA SWITCH funkció lehetővé teszi számunkra, hogy több feltételt teszteljünk további funkció beágyazása nélkül, de az összes logikai függvényt alkalmazhatjuk ugyanazon a függvényen belül.

A logikai függvények szinte az összes számítás szíve és lelke. Ezek elsajátítása nagyobb hozzáadott értéket ad a készségkészletünk CV-jéhez. Ha több feltételvizsgálatról van szó, a logikai képletek elkerülhetetlenek az eredmény eléréséhez. Teljes mértékben támaszkodunk az IF függvényre az excel és a VBA esetében. Kezdőként maga az IF feltétel nehezen emészthető, de ha azt mondjuk, hogy beágyazott IF, akkor ez egy herkulusi képlet, amelyet el kell sajátítani. Azonban a beágyazott képletek legyőzéséhez rendelkezünk egy SWITCH nevű képlettel.

Szintaxis

  • A Switch kiszámítja az első kifejezést, és ha az érték igaz, akkor a kifejezés értékét adja vissza, és ha az 1. kifejezés értéke nem igaz, akkor folytatja a 2. kifejezés ugyanazon számítását, és ha az eredmény igaz, akkor a 2 érték jelenik meg, de ha a kifejezést hamisként adja vissza, akkor a kapcsoló egy másik kifejezésre lép.

Mi van akkor, ha egyik kifejezés sem igaz, és mindet hamisnak adják vissza? Ilyen helyzetben futási idő hibát kapunk, hacsak nincs megelőző hibakezelésünk az ilyen helyzetekre.

Hogyan kell használni a kapcsoló funkciót a VBA-ban?

1. példa

Most nézze meg az alábbi kódot.

Kód:

Sub Switch_Példa1 () Dim ResultValue mint karakterlánc Dim FruitName As karakterlánc FruitName = "Apple" ResultValue = Switch (FruitName = "Apple", "Medium", FruitName = "Orange", "Cold", FruitName = "Sapota", "Heat" , FruitName = "Görögdinnye", "Hideg") MsgBox ResultValue End Sub
  • A fenti kódban két VBA változót deklaráltam.
Dim ResultValue mint karakterlánc Dim FruitName mint karakterlánc
  • A FruitName változóhoz a gyümölcs nevét “Apple” néven rendeltem.
FruitName = "Alma"
  • Ezután a „ResultValue” változóhoz hozzárendeltem a SWITCH-ot. Hadd magyarázzam el neked a funkciót.
Kapcsoló (FruitName = "Apple", "Medium",
  • Ez a képlet első része. Ha a FruitName változó Apple, akkor az eredménynek közepesnek kell lennie.

A következő az

FruitName = "Narancs", "Hideg",
  • Ez az alap excel képlet második része. Ha a FruitName változó narancssárga, akkor az eredménynek „hidegnek” kell lennie.

Ezek után írtunk.

FruitName = "Sapota", "Heat",
  • Ez a képlet harmadik része. Ha a FruitName változó Sapota, akkor az eredménynek „Heat” -nek kell lennie.
FruitName = "Görögdinnye", "Hideg"

Ez a képlet utolsó része. Ha a FruitName változó görögdinnye, akkor az eredménynek „hidegnek” kell lennie.

Amikor futtatom ezt a kódot, az eredmény „Közepes” értékkel tér vissza, mert a „FruitName” változóhoz az értéket „Apple” néven rendeltem.

Mivel a Gyümölcs neve „Apple”, logikai tesztünk eredménye „Közepes”, ezért ennek megfelelően van egy eredmény az üzenet mezőben.

Rendelje hozzá a különböző értékeket a „FruitName” változóhoz, hogy megkapja a megfelelő eredményt.

2. példa

Vessen még egy példát.

Kód:

Sub Switch_Példa2 () Dim ResultValue mint karakterlánc Dim CityName As karakterlánc CityName = "Delhi" ResultValue = Switch (CityName = "Delhi", "Metro", CityName = "Bangalore", "Non Metro", CityName = "Mumbai", "Metro" ", CityName =" Kolkata "," Non Metro ") MsgBox ResultValue End Sub

Ezúttal városneveket rendeltem hozzá, függetlenül attól, hogy milyen városnevet adunk meg a „CityName” változóhoz, ennek megfelelően néhány eredményt alkalmaztam a megfelelő városnevekre.

Ha a város nevét „Delhi vagy Mumbai” néven alkalmazza, akkor az eredményt „Metro” -ként kapjuk meg, vagy ha a város nevét „Bangalore vagy Kolkata” néven alkalmazzuk, akkor az eredményt „Non-Metro” néven kapjuk.

Most a fenti példában a város nevét „Delhi” néven emlegettem, így eredményünk a „Metro” lesz a VBA üzenetmezőjében.

Így működik a SWITCH funkció a VBA-ban.

Dolgok, amikre emlékezni kell

  • A SWITCH mind excel munkalapként, mind VBA funkcióként elérhető.
  • Használhatjuk a SWITCH-ot az egymásba ágyazott IF-feltételek alternatívájaként.
  • Használja ezt valós példákban a gyakorlati problémamegoldáshoz.

érdekes cikkek...