VBA-omkopplarfunktion - Hur använder jag switchfunktionen?

Innehållsförteckning

Excel VBA-omkopplarfunktion

Excel VBA-omkopplarfunktion

VBA SWITCH- funktionen tillåter oss att testa flera förhållanden utan att kapa ytterligare funktioner, men vi kan tillämpa alla logiska funktioner inom samma funktion.

Logiska funktioner är hjärtat och själen i nästan alla beräkningar. Att behärska dem kommer att tillföra mer värde till vårt CV. När det gäller flera villkorstester är logiska formler oundvikliga för att nå resultatet. Vi litar helt på IF-funktionen i Excel & VBA. Som förrätt är IF-tillståndet svårt att smälta, men när vi säger nestat IF är det en herculean formel att bemästra. Men för att övervinna alla de kapslade formlerna har vi en formel som heter SWITCH.

Syntax

Switch beräknar det första uttrycket, och om värdet är sant returnerar det värdet för uttrycket, och om värdet för uttryck 1 inte är sant, fortsätter det för samma beräkning för uttryck 2, och om resultatet är sant, sedan visas värdet 2 men om uttrycket returneras som falskt växlar växeln vidare till ett annat uttryck.

Vad händer om inget av uttrycket är sant och alla returneras som falska? I en sådan situation får vi körtidsfel om vi inte har en förebyggande felhantering för sådana situationer.

Hur använder jag switchfunktionen i VBA?

Exempel 1

Titta nu på koden nedan.

Koda:

Sub Switch_Example1 () Dim ResultValue Som String Dim FruitName Som String FruitName = "Apple" ResultValue = Switch (FruitName = "Apple", "Medium", FruitName = "Orange", "Cold", FruitName = "Sapota", "Heat" , FruitName = "Vattenmelon", "Kall") MsgBox ResultValue End Sub

I ovanstående kod har jag deklarerat två VBA-variabler.

Dim ResultValue As String Dim FruitName Som String

För variabeln FruitName har jag tilldelat fruktnamnet "Apple".

FruitName = "Äpple"

Därefter har jag tilldelat SWITCH för variabeln "ResultValue". Låt mig förklara för dig funktionen.

Växla (FruitName = "Apple", "Medium",

Detta är den första delen av formeln. Om variabeln FruitName är Apple bör resultatet vara "Medium".

Nästa är

FruitName = "Orange", "Cold",

Detta är den andra delen av den grundläggande excelformeln. Om variabeln FruitName är orange ska resultatet vara "kallt".

Efter det har vi skrivit.

FruitName = "Sapota", "Heat",

Detta är den tredje delen av formeln. Om variabeln FruitName är Sapota, bör resultatet vara "Heat".

FruitName = "Vattenmelon", "Kall"

Detta är den sista delen av formeln. Om variabeln FruitName är vattenmelon, bör resultatet vara "kallt".

När jag kör den här koden kommer den att returnera resultatet som "Medium" för för variabeln "FruitName" har jag tilldelat värdet "Apple".

Eftersom Fruit Name är "Apple" är vårt logiska testresultat "Medium", så därför har vi ett resultat i meddelandefältet.

Tilldela de olika värdena till variabeln "FruitName" för att få respektive resultat.

Exempel 2

Ta en titt på ytterligare ett exempel.

Koda:

Sub Switch_Example2 () Dim ResultValue Som String Dim CityName Som String CityName = "Delhi" ResultValue = Switch (CityName = "Delhi", "Metro", CityName = "Bangalore", "Non Metro", CityName = "Mumbai", "Metro ", CityName =" Kolkata "," Non Metro ") MsgBox ResultValue End Sub

Den här gången har jag tilldelat stadsnamn, oavsett vilket stadsnamn vi tillhandahåller variabeln "CityName", följaktligen applicerade jag några resultat på respektive stadsnamn.

Om du tillämpar stadsnamnet som "Delhi eller Mumbai" får vi resultatet som "Metro" eller om vi tillämpar stadsnamnet som "Bangalore eller Kolkata" får vi resultatet som "Non-Metro".

Nu i exemplet ovan har jag nämnt stadens namn som “Delhi”, så vårt resultat blir “Metro” i meddelandefältet i VBA.