De viktigste tilstandssetningene som brukes i Excel VBA er setningene Hvis da и Velg Sak. Begge disse uttrykkene tester en eller flere forhold og utfører forskjellige handlinger, avhengig av resultatet. Vi vil snakke om disse to betingede operatørene mer detaljert neste gang.
"Hvis ... Da"-uttalelse i Visual Basic
operatør Hvis da sjekker tilstanden, og hvis den er sann (TRUE), utføres det angitte settet med handlinger. Den kan også definere et sett med handlinger som skal utføres hvis betingelsen er FALSE.
Operatørsyntaks Hvis da som dette:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
I dette uttrykket, elementene Eller hvis и ellers betingelser operatør kan utelates hvis de ikke er nødvendige.
Nedenfor er et eksempel hvor du bruker operatøren Hvis da Fyllfargen til den aktive cellen endres avhengig av verdien i den:
Hvis ActiveCell.Value < 5 Then ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет ElseIf ActiveCell.Value < 10 Then ActiveCell.Interior.Color 49407.Color' я в оранжевый цвет Else ActiveCell.Interior.Color = 255 'Ячейка окрашивается в красный цвет End If
Merk at så snart betingelsen blir sann, avbrytes utførelsen av den betingede setningen. Derfor, hvis verdien av variabelen ActiveCell mindre enn 5, så blir den første betingelsen sann og cellen farges grønn. Etter det, utførelsen av uttalelsen Hvis da er avbrutt og de andre forholdene er ikke kontrollert.
Lær mer om bruk av den betingede operatoren i VBA Hvis da kan finnes på Microsoft Developer Network.
"Velg sak"-erklæring i Visual Basic
operatør Velg Sak ligner på operatør Hvis da ved at den også sjekker sannheten til tilstanden og, avhengig av resultatet, velger ett av alternativene.
Operatørsyntaks Velg Sak som dette:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
Element Case Else er ikke nødvendig, men anbefales for håndtering av uventede verdier.
I det følgende eksempelet bruker du konstruksjonen Velg Sak endrer fyllfargen til gjeldende celle avhengig av verdien i den:
Velg Case ActiveCell.Value Case er <= 5 ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет Case 6, 7, 8, 9 ActiveCell.Јич.49407 = ся в оранжевый цвет Case 10 ActiveCell.Interior. Farge = 65535 'Ячейка окрашивается в жёлтый цвет Case 11 To 20 ActiveCell.Interior.Color = 10498160 'Ячейка окрашивается Interior. .Color = 255 'Ячейка окрашивается в красный цвет End Select
Eksemplet ovenfor viser hvordan du kan angi en verdi for et element på ulike måter. Sak under konstruksjon Velg Sak. Dette er måtene:
| Saken er <= 5 | Dermed bruker søkeordet Saken er du kan sjekke om verdien tilfredsstiller Uttrykk tilstanden til skjemaet <= 5. |
| Sak 6, 7, 8, 9 | På denne måten kan du sjekke om verdien stemmer Uttrykk med en av de oppførte verdiene. De oppførte verdiene er atskilt med komma. |
| Sak 10 | Dette sjekker om verdien stemmer Uttrykk med en gitt verdi. |
| Sak 11 Det er det 20 | Dermed kan du skrive et uttrykk for å sjekke om verdien tilfredsstiller Uttrykk tilstanden til skjemaet fra 11 til 20 (tilsvarer ulikheten "11<=verdi<=20"). |
| Case Else | Som dette, ved å bruke søkeordet ellers, handlinger er indikert for saken hvis verdien Uttrykk samsvarer ikke med noen av alternativene som er oppført Sak. |
Så snart en av forholdene er funnet, utføres de tilsvarende handlingene og strukturen går ut. Velg Sak. Det vil si at i alle fall bare én av de listede grenene vil bli utført. Sak.
Mer informasjon om driften av VBA-erklæringen Velg Sak kan finnes på Microsoft Developer Network.