How can I substitute "A1" in a "Forms" statement within a loop (as shown below) to move to the next textbox in a form.
Dim strAs As String
Dim Counter As Integer
Counter = 0
Do Until Counter = 30
Counter = Counter + 1
varX = DLookup("Question" & Counter, "Answers_Horizontal")
strAs = "[" & "A" & Counter & "]
"[Forms]![Form_Questions]!" & strAs & " = varX"
Loop
This is the original syntax ===> [Forms]![Form_Questions]![A1] = varX
I do not want create thirty (30) "Forms" statements.
Dim strAs As String
Dim Counter As Integer
Counter = 0
Do Until Counter = 30
Counter = Counter + 1
varX = DLookup("Question" & Counter, "Answers_Horizontal")
strAs = "[" & "A" & Counter & "]
"[Forms]![Form_Questions]!" & strAs & " = varX"
Loop
This is the original syntax ===> [Forms]![Form_Questions]![A1] = varX
I do not want create thirty (30) "Forms" statements.