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

4 votes346 views1 answer
VBA Deep Clone Dictionary
VBA
0 vote289 views1 answer
Excel run macro every 5 minutes
VBA
0 vote296 views1 answer
Vbnet hex to binary
VBA
0 vote273 views1 answer
Vbide vbproject reference
VBA
0 vote312 views1 answer
Create links in msgbox in vb
VBA
0 vote282 views1 answer
Excel vba scroll to cell
VBA
0 vote280 views1 answer
Excel vba copy entire sheet paste values
VBA
11 votes405 views1 answer
Excel vba How to URL encode a string
VBA
-1 vote275 views1 answer
Text to speech vb.net
VBA
0 vote294 views1 answer
Vba change named range address
VBA