replace Me.field1 with Me.field(i)

[Wrathchild]

Hi, how do I replace Me.field1, Me.field2, Me.field3, etc. with Me.field(i) in a loop so I don't have to write out fifteen of these? I can't get the syntax correct.

thanks

 

[xlbo]

I very much doubt you can - the way to loop through collections is to use the For Each...Next construct

for each fld in Tablename.Fields
msgbox fld.name
next

Rgds, Geoff
Si hoc legere scis, nimis eruditionis habes
Want the best answers to your questions ? - then read me baby one more time - faq222-2244

 

[SkipVought]

Hi,

Just use the Fields Collection...

For Each f In Me.Fields
   
Next

Then you could add a counter or use a Select Case.

Hope this helps

Skip,
Skip@TheOfficeExperts.com

http://www.TheOfficeExperts.com

 

[Wrathchild]

ok, but how would I set this up, currently I have:

with rst
.addnew
!record1 = Me.field1
!record2 = Me.field2
!record3 = Me.field3
etc.

how do I apply a counter to both the rst and field names?
I've figured out the field name part (search for certain common name in field name) but compiler doesn't like !record(i)

thanks