Funcția de comutare VBA Excel
Funcția VBA SWITCH ne permite să testăm mai multe condiții fără să cuibărim nicio altă funcție, dar putem aplica toate funcțiile logice în cadrul aceleiași funcții.
Funcțiile logice sunt inima și sufletul a aproape toate calculele. Stăpânirea lor va adăuga mai multă valoare CV-ului nostru de abilități. Când vine vorba de teste de condiții multiple, formulele logice sunt inevitabile pentru a ajunge la rezultat. Ne bazăm complet pe funcția IF în excel și VBA. Ca început, condiția IF în sine este greu de digerat, dar când spunem IF imbricat, este o formulă herculeană de stăpânit. Cu toate acestea, pentru a depăși toate acele formule imbricate, avem o formulă numită SWITCH.
Sintaxă
- Comutatorul calculează prima expresie și, dacă valoarea este adevărată, returnează valoarea pentru expresie, iar dacă valoarea pentru expresia 1 nu este adevărată, se continuă pentru același calcul pentru expresia 2 și dacă rezultatul este adevărat, atunci se afișează valoarea 2, dar dacă expresia este returnată ca falsă, comutatorul trece la o altă expresie.
Ce se întâmplă dacă niciuna dintre expresii nu este adevărată și toate sunt returnate ca false? Într-o astfel de situație, primim erori în timpul rulării, cu excepția cazului în care avem o soluție preventivă de gestionare a erorilor pentru astfel de situații.
Cum se utilizează funcția de comutare în VBA?
Exemplul nr. 1
Acum, uitați-vă la codul de mai jos.
Cod:
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
- În codul de mai sus, am declarat două variabile VBA.
Dim ResultValue As String Dim FruitName As String
- Pentru variabila FruitName, am atribuit numele fructului ca „Apple”.
FruitName = "Apple"
- Apoi, pentru variabila „ResultValue”, am atribuit SWITCH-ul. Permiteți-mi să vă explic funcția.
Switch (FruitName = "Apple", "Medium",
- Aceasta este prima parte a formulei. Dacă variabila FruitName este Apple, atunci rezultatul ar trebui să fie „Medium”.
Următorul este
FruitName = "Portocaliu", "Rece",
- Aceasta este a doua parte a formulei Excel de bază. Dacă variabila FruitName este Orange, atunci rezultatul ar trebui să fie „Rece”.
După aceea, am scris.
FruitName = "Sapota", "Heat",
- Aceasta este a treia parte a formulei. Dacă variabila FruitName este Sapota, atunci rezultatul ar trebui să fie „Heat”.
FruitName = "Pepene verde", "Rece"
Aceasta este ultima parte a formulei. Dacă variabila FruitName este Watermelon, atunci rezultatul ar trebui să fie „Rece”.
Când rulez acest cod, acesta va returna rezultatul ca „Mediu”, deoarece pentru variabila „FructNume”, am atribuit valoarea ca „Apple”.
Întrucât Fruit Name este „Apple”, rezultatul nostru logic al testului este „Medium”, deci în consecință, avem un rezultat în caseta de mesaje.
Atribuiți diferitele valori variabilei „FruitName” pentru a obține rezultatul respectiv.
Exemplul nr. 2
Aruncați o privire la încă un exemplu.
Cod:
Sub Switch_Example2 () Dim ResultValue As String Dim CityName As String CityName = "Delhi" ResultValue = Switch (CityName = "Delhi", "Metro", CityName = "Bangalore", "Non Metro", CityName = "Mumbai", "Metro ", CityName =" Kolkata "," Non Metro ") MsgBox ResultValue End Sub
De data aceasta am atribuit numele orașelor, indiferent de numele orașului pe care îl furnizăm variabilei „CityName”, în consecință, am aplicat câteva rezultate pentru numele orașelor respective.
Dacă aplicați numele orașului fie „Delhi sau Mumbai”, obținem rezultatul ca „Metro” sau dacă aplicăm numele orașului fie „Bangalore, fie Kolkata”, obținem rezultatul ca „Non-Metro”.
Acum, în exemplul de mai sus, am menționat numele orașului ca „Delhi”, astfel încât rezultatul nostru va fi „Metro” în caseta de mesaj din VBA.
Acesta este modul în care funcția SWITCH funcționează în VBA.
Lucruri de amintit
- SWITCH este disponibil atât ca foi de lucru Excel, cât și ca funcții VBA.
- Putem utiliza SWITCH ca o alternativă la condițiile IF imbricate Excel.
- Utilizați acest lucru în exemple reale pentru a obține rezolvarea practică a problemelor.
