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 vote327 views1 answer
Vb check if row has column
VBA
0 vote333 views1 answer
Vba like with wildcard
VBA
0 vote356 views2 answers
VB
VBA
18 votes533 views2 answers
Vba make word from bytes
VBA
2 votes335 views2 answers
Vba code to remove duplicates from a column
VBA
0 vote346 views1 answer
Vba test optional argument
VBA
0 vote338 views2 answers
Vba remove line breaks
VBA
5 votes326 views1 answer
Excel vba high word from Long Integer
VBA
0 vote322 views1 answer
Vba dictionary length
VBA
0 vote331 views1 answer
Change whcih control a user has selected vb
VBA