Nest if statement into a for statement

 
Sub forTest()
    Dim intCounter As Integer
    
    For intCounter = 1 To 10
        If (intCounter Mod 2) = 0 Then
            Debug.Print intCounter & " is an even number"
        Else
            Debug.Print intCounter & " is an odd number"
        End If
    Next
End Sub

Related examples in the same category

1.	For Loops with different steps
2.	you can go backward and use increments other than 1
3.	For...Next Loop
4.	The For...Next construct is used when you have an exact number of iterations you want to perform
5.	For loop whose step is 2
6.	Checks values in a range 10 rows by 5 columns
7.	Iterates six times outputting the numbers 0, 2, 4, 6, 8, and 10 in a message box:
8.	iterates four times outputting the numbers 0, 3, 6, and 9 in a message box:
9.	the loop iterates just three times outputting the numbers 10, 5, and 0 in a message box:
10.	Non integer step for loop

Nest if statement into a for statement : For « Language Basics « VBA / Excel / Access / Word

Related examples in the same category