Les declaracions de condició més importants utilitzades a Excel VBA són les declaracions Si llavors и Seleccioneu Cas. Ambdues expressions posen a prova una o més condicions i, segons el resultat, realitzen diferents accions. A continuació parlarem d'aquests dos operadors condicionals amb més detall.
Declaració "Si... Aleshores" a Visual Basic
Operador Si llavors comprova la condició i, si és certa (VERTADER), es realitza el conjunt d'accions especificat. També pot definir un conjunt d'accions a realitzar si la condició és FALSA.
Sintaxi de l'operador Si llavors com això:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
En aquesta expressió, els elements ElseIf и else l'operador de condicions es pot ometre si no són necessaris.
A continuació es mostra un exemple en què, utilitzant l'operador Si llavors El color de farciment de la cel·la activa canvia en funció del valor que hi hagi:
Si ActiveCell.Value < 5 Aleshores ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет ElseIf ActiveCell.Value < 10 Aleshores ActiveCell.Interior.Color = Ячейка Ячейка Я49407.Color = зелёный цвет ется в оранжевый цвет Else ActiveCell.Interior.Color = 255 'Ячейка окрашивается в красный цвет End If
Tingueu en compte que tan aviat com la condició esdevé certa, l'execució de la instrucció condicional s'avorta. Per tant, si el valor de la variable ActiveCell menys de 5, aleshores la primera condició es fa vertadera i la cel·la es pinta de verd. Després d'això, l'execució de la declaració Si llavors s'interromp i les altres condicions no es comproven.
Obteniu més informació sobre com utilitzar l'operador condicional a VBA Si llavors es pot trobar a la xarxa de desenvolupadors de Microsoft.
Declaració "Seleccioneu cas" a Visual Basic
Operador Seleccioneu Cas semblant a l'operador Si llavors en què també comprova la veritat de la condició i, en funció del resultat, tria una de les opcions.
Sintaxi de l'operador Seleccioneu Cas com això:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
Element Cas Altre no és necessari, però es recomana per gestionar valors inesperats.
En l'exemple següent, utilitzant la construcció Seleccioneu Cas canvia el color de farciment de la cel·la actual en funció del valor que hi hagi:
Seleccioneu el cas ActiveCell.Value El cas és <= 5 ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет Case 6, 7, 8, 9 ActiveCell.Interior.Color = 'Ячейка окрашивается в зелёный цвет Case 49407, 10, 65535, 11 ActiveCell.Interior.Color = '20четай 10498160 я в оранжевый цвет Case 255 ActiveCell.Interior.Color = XNUMX 'Ячейка окрашивается в жёлтый цвет Case XNUMX To XNUMX ActiveCell.Interior.Color = XNUMX 'Ячейка окрашивается в жёлтый цвет Case XNUMX To XNUMX ActiveCell.Interior. ивается в лиловый цвет Case Else ActiveCell.Interior.Color = XNUMX 'Ячейка окрашивается в красный цвет End Select
L'exemple anterior mostra com podeu establir un valor per a un element de diverses maneres. cas en construcció Seleccioneu Cas. Aquestes són les maneres:
| El cas és <= 5 | Per tant, utilitzant la paraula clau El cas és podeu comprovar si el valor satisfà Expressions condició de la forma <= 5. |
| cas 6, 7, 8, 9 | D'aquesta manera podeu comprovar si el valor coincideix Expressions amb un dels valors indicats. Els valors indicats estan separats per comes. |
| cas 10 | Això comprova si el valor coincideix Expressions amb un valor donat. |
| cas 11 Això és 20 | Així, podeu escriure una expressió per comprovar si el valor compleix Expressions condició de la forma de 11 20 a (equivalent a la desigualtat "11<=valor<=20"). |
| Cas Altre | Així, utilitzant la paraula clau else, s'indiquen accions per al cas si el valor Expressions no coincideix amb cap de les opcions enumerades cas. |
Tan bon punt es troba una de les condicions, es realitzen les accions corresponents i l'estructura surt. Seleccioneu Cas. És a dir, en tot cas, només s'executarà una de les sucursals enumerades. cas.
Més informació sobre el funcionament de la declaració VBA Seleccioneu Cas es pot trobar a la xarxa de desenvolupadors de Microsoft.