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 vote208 views1 answer
Ribbon show/hide
VBA
5 votes208 views1 answer
Excel formula how to create strings containing double quotes
VBA
0 vote212 views1 answer
Vba pass named range to function
VBA
0 vote210 views1 answer
Loop through lines in text file vb net
VBA
1 vote216 views1 answer
Set font for ms chart vb.net
VBA
3 votes240 views1 answer
Excel vba make long from two shorts
VBA
0 vote216 views1 answer
Excel vba scroll to cell
VBA
0 vote203 views1 answer
Excel vba hide gridlines
VBA
0 vote185 views1 answer
Remove frist letter from string vbnet
VBA
5 votes221 views1 answer
Excel vba left word from Long Integer
VBA