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

0 vote151 views1 answer
Combobox dropdown search visual basic -excel -C#
VBA
22 votes277 views1 answer
Excel vba check if directory exists
VBA
0 vote141 views1 answer
Get current year vb
VBA
1 vote140 views1 answer
Textbox find and replace vb
VBA
25 votes282 views3 answers
String to date vb
VBA
0 vote147 views1 answer
Vbs send keys
VBA
0 vote148 views1 answer
Vbnet check if number is even or odd
VBA
2 votes138 views1 answer
Vba uppercase first letter of each word
VBA
0 vote151 views1 answer
Not allow form to be resized
VBA
0 vote170 views1 answer
Excel vba first column in range
VBA