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 vote122 views1 answer
Vba check 32 or 64 bit
VBA
-1 vote118 views1 answer
System.Data.OleDb.OleDbException: 'No value given for one or more required parameters.'
VBA
18 votes174 views3 answers
Excel-vba make integer
VBA
0 vote124 views1 answer
Vba verticalalignment
VBA
0 vote125 views1 answer
Vbnet hex to binary
VBA
0 vote140 views1 answer
Como ler subitem de um array em json usando vbnet
VBA
0 vote134 views2 answers
Vba remove line breaks
VBA
1 vote123 views1 answer
Export datagridview to excel vb.net
VBA
0 vote131 views1 answer
Style percent not found vba
VBA
5 votes124 views1 answer
Excel vba get user selected range
VBA