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 vote174 views1 answer
Excel vba unmerge sheet
VBA
0 vote213 views1 answer
Vba excel parser xml
VBA
0 vote181 views1 answer
.net crash app
VBA
0 vote169 views1 answer
Telephon call in vba
VBA
1 vote164 views1 answer
Excel vba Run a Macro every time sheet is changed
VBA
0 vote197 views1 answer
Vba cell all borders
VBA
0 vote167 views1 answer
Limit combobox to list vba
VBA
8 votes262 views1 answer
Excel vba determine number of elements in a 1D array
VBA
0 vote169 views1 answer
Send text to clipboard vb.net
VBA
0 vote177 views1 answer
Vbs expand env var
VBA