For...Next Loop Problem

[Shaft]

In the following code how would I make the A1 control reference increase when the i increases i.e when i=2 reference A2, i=3 reference A3.

For i = 1 To 33
    Forms![Engineer Full Report].[A[COLOR=Red]1[/COLOR]].ForeColor = RGB(255, 128, 0)
    Forms![Engineer Full Report].[A[COLOR=Red]1[/COLOR]].FontBold = True
Next

Any help would be much appreciated

Thank you

 

[workmad3]

try this

For i = 1 To 33
    Forms![Engineer Full Report].[Controls("A" & i)].ForeColor = RGB(255, 128, 0)
    Forms![Engineer Full Report].[Controls("A" & i)].FontBold = True
Next i

hope it helps

 

[Shaft]

That worked like a treat, just needed to drop the [] around the controls reference in the code you posted.

Thank you very much