Select case vba

Dim Number 
Number = 8    ' Initialize variable. 
Select Case Number    ' Evaluate Number. 
Case 1 To 5    ' Number between 1 and 5, inclusive. 
    Debug.Print "Between 1 and 5" 
' The following is the only Case clause that evaluates to True. 
Case 6, 7, 8    ' Number between 6 and 8. 
    Debug.Print "Between 6 and 8" 
Case 9 To 10    ' Number is 9 or 10. 
Debug.Print "Greater than 8" 
Case Else    ' Other values. 
    Debug.Print "Not between 1 and 10" 
End Select

Similar codes

1 vote220 views1 answer
Add control vb
VBA
0 vote269 views1 answer
How to call gcd in vba
VBA
0 vote221 views1 answer
Reset border color textbox vba
VBA
0 vote231 views1 answer
Loop through each cell in dgv vbnet
VBA
1 vote230 views1 answer
Extract the second word in a text in excel
VBA
1 vote223 views1 answer
Add a index column power bi
VBA
0 vote225 views1 answer
Vba round to 2 decimals
VBA
31 votes277 views1 answer
Vba how to convert a column number into an Excel column
VBA
0 vote237 views1 answer
Excel vba named range exists
VBA
0 vote227 views1 answer
Vbnet check if string is only numbers
VBA