Funkce přepínače Excel VBA
Funkce VBA SWITCH nám umožňuje testovat více podmínek bez vnoření jakékoli další funkce, ale můžeme použít všechny logické funkce v rámci stejné funkce samotné.
Logické funkce jsou srdcem a duší téměř všech výpočtů. Jejich zvládnutí přidá větší hodnotu našemu životopisu se sadou dovedností. Pokud jde o více testů podmínek, logické vzorce jsou nevyhnutelné k dosažení výsledku. Úplně se spoléháme na funkci IF v Excelu a VBA. Jako začátek je podmínka IF sama o sobě těžko stravitelná, ale když řekneme vnořenou IF, je to herkulovský vzorec, který je třeba zvládnout. Abychom však překonali všechny tyto vnořené vzorce, máme vzorec s názvem SWITCH.
Syntax
- Přepínač vypočítá první výraz, a pokud je hodnota true, vrátí hodnotu výrazu a pokud hodnota výrazu 1 není true, pokračuje se stejným výpočtem pro výraz 2 a pokud je výsledek true, pak se zobrazí hodnota 2, ale pokud je výraz vrácen jako false, přepne se na jiný výraz.
Co když žádný z výrazů není pravdivý a všechny jsou vráceny jako nepravdivé? V takové situaci dostaneme chybu za běhu, pokud nebudeme mít preventivní zpracování chyb pro takové situace.
Jak používat funkci přepínače ve VBA?
Příklad č. 1
Nyní se podívejte na níže uvedený kód.
Kód:
Sub Switch_Example1 () Dim ResultValue As String Dim FruitName As String FruitName = "Apple" ResultValue = Switch (FruitName = "Apple", "Medium", FruitName = "Orange", "Cold", FruitName = "Sapota", "Heat" , FruitName = "Watermelon", "Cold") MsgBox ResultValue End Sub
- Ve výše uvedeném kódu jsem deklaroval dvě proměnné VBA.
Dim ResultValue As String Dim FruitName jako String
- Pro proměnnou FruitName jsem přiřadil název ovoce jako „Apple“.
FruitName = "Apple"
- Dále jsem pro proměnnou „ResultValue“ přiřadil SPÍNAČ. Vysvětlím vám tuto funkci.
Přepnout (FruitName = "Apple", "Medium",
- Toto je první část vzorce. Pokud je proměnná FruitName Apple, výsledek by měl být „Střední“.
Další je
FruitName = "Oranžová", "Studená",
- Toto je druhá část základního vzorce aplikace Excel. Pokud je proměnná FruitName oranžová, měl by být výsledek „studený“.
Poté jsme napsali.
FruitName = "Sapota", "Heat",
- Toto je třetí část vzorce. Pokud je proměnná FruitName Sapota, měl by být výsledek „Heat“.
FruitName = "Meloun", "Studený"
Toto je poslední část vzorce. Pokud je proměnná FruitName Watermelon, pak by výsledek měl být „Cold“.
Když spustím tento kód, vrátí výsledek jako „Střední“, protože pro proměnnou „FruitName“ jsem přiřadil hodnotu jako „Apple“.
Vzhledem k tomu, že název ovoce je „Apple“, výsledek našeho logického testu je „střední“, a proto máme výsledek v okně se zprávou.
Přiřaďte různé hodnoty proměnné „FruitName“, abyste získali příslušný výsledek.
Příklad č. 2
Podívejte se na další příklad.
Kód:
Sub Switch_Example2 () Dim ResultValue jako řetězec Dim CityName jako řetězec CityName = "Delhi" ResultValue = Switch (CityName = "Delhi", "Metro", CityName = "Bangalore", "Non Metro", CityName = "Mumbai", "Metro" ", CityName =" Kolkata "," Non Metro ") MsgBox ResultValue End Sub
Tentokrát jsem podle toho přiřadil názvy měst, bez ohledu na název města, který dodáváme, do proměnné „CityName“, a proto jsem použil příslušné výsledky na názvy příslušných měst.
Pokud použijete název města jako „Dillí nebo Bombaj“, dostaneme výsledek jako „Metro“, nebo pokud použijeme název města jako „Bangalore nebo Kalkata“, dostaneme výsledek jako „Non-Metro“.
Nyní jsem ve výše uvedeném příkladu uvedl název města jako „Dillí“, takže naším výsledkem bude „Metro“ ve zprávě ve VBA.
Takto funguje funkce SWITCH ve VBA.
Věci k zapamatování
- SWITCH je k dispozici jako listy aplikace Excel i funkce VBA.
- Můžeme použít SWITCH jako alternativu k vnořeným IF podmínkám Excel.
- Toto použijte v reálných příkladech k praktickému řešení problémů.
