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

22 votes336 views1 answer
Excelvba check for directory
VBA
1 vote174 views1 answer
Excel vba close form escape key
VBA
1 vote182 views1 answer
Excel vba get column number from column name
VBA
1 vote173 views1 answer
How to put a gridpain in a vbox
VBA
0 vote184 views1 answer
Vba code to select image in sheet
VBA
0 vote183 views4 answers
Jwt token vb.net validation
VBA
11 votes332 views1 answer
Excel vba How to URL encode a string
VBA
0 vote177 views1 answer
Vbnet chart make 0 gridline line different color
VBA
0 vote167 views1 answer
Excel vba address not absolute
VBA
0 vote193 views1 answer
Vba registry settings
VBA