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

1 vote180 views1 answer
Find and replace textbox
VBA
0 vote171 views1 answer
Excel vba protect sheet
VBA
0 vote155 views1 answer
Vba check 32 or 64 bit
VBA
0 vote175 views1 answer
Vb run command
VBA
0 vote175 views1 answer
Programmatically copy data from one workshet to another excel
VBA
0 vote220 views2 answers
VB
VBA
0 vote162 views1 answer
Excel vba chrw max value
VBA
0 vote170 views1 answer
Windows Presentation Foundation dark title bar
VBA
0 vote173 views1 answer
Vbnet line chart showing extra space
VBA
1 vote157 views1 answer
Vba declare api 64 bit 32 bit
VBA