Populate fields in excel from access form

[access101]

i have a form with 60 textboxes named I1- I60

i need a for statement that will loop through and populate my excel spreadsheet
for this example
I1=54.25
I2=38.16
so far i have this which works but is not looping correctly
For a = 7 To 8
For b = 1 To 2
xlSheet.Range("d" & a) = Me("I" & b)
Next b, a

once i run the code

excel shows
d7 = 38.16
d8 = 38.16

 

[dhookom]

Your code is expecting to find a bound control name "I1" and "I2". You might want to use arrays or possibly the Eval() function.

Duane
Hook'D on Access
MS Access MVP

 

[access101]

can you please show me an example

 

[dhookom]

It would help to understand you requirements better. However consider code like:

Public Function TestArray()
    Dim arI(2)
    Dim b As Integer
    arI(1) = 54.25
    arI(2) = 38.16
    For b = 1 To 2
        Debug.Print arI(b)
    Next
End Function

Duane
Hook'D on Access
MS Access MVP

 

[TheAceMan1]

access101 . . .

Just a guess ...

[blue]   Dim a As Long, b As Long
   
   For a = 7 To 8
      b = a - 6
      xlSheet.Range("d" & a) = Me("I" & b)
   Next[/blue]

See Ya! . . . . . .

Be sure to see faq219-2884 [blue]Worthy Reading![/blue]
Also faq181-2886 [blue]Worthy Reading![/blue]

 

[access101]

thanks TheAceMan1 that worked! I still don't understand why your code worked vs mine but appreciate the help.

 

[TheAceMan1]

access101 . . .

Hint! ... you only need one loop!

See Ya! . . . . . .

Be sure to see faq219-2884 [blue]Worthy Reading![/blue]
Also faq181-2886 [blue]Worthy Reading![/blue]