You could use Select Case. It would look something like this...
Sub test() Select Case i Case 1, 3, 7, 9, 10, 15, 16, 17, 18, 19, 20'do something End SelectEnd Sub
You could use Select Case. It would look something like this...
Sub test() Select Case i Case 1, 3, 7, 9, 10, 15, 16, 17, 18, 19, 20'do something End SelectEnd Sub