loop through records in an Access form

[Stevep4]

I literally did this 15 years ago in Access, but have forgotten. I have a form connected to a table. I want code that will simply look at the filelds in the table, loop through them so that I can run a report for each records. Here's the order I want to do things in.

Store 1 is in the form
A report is exported for store 1 (the query the report is running off of is looking at the form field, which shows store 1)
Store 2 is then populated in the form and a second report is exported
and so on.

I know how to export a report using VBA, I'm just not show how to get the form to loop through all the records.

Thanks,

 

[stumac]

I would say basing the report on the form value isn't the most efficient way to do this, as you need to wait for the form to load each record etc. I would normally use a TempVar or build the report data source on the fly (both while looping through a recordset).

Using the form:

Dim fname As String


DoCmd.GoToRecord , , acFirst
With Me.Recordset
Do Until .AbsolutePosition = .RecordCount - 1
    DoCmd.GoToRecord , , acNext
    fname = [COLOR=#ff0000][B] 'Build unique filename[/B][/COLOR]
    DoCmd.OutputTo acOutputReport, "MyReport", acFormatPDF, "Fname"
Loop
End With

 

[stumac]

sorry: DoCmd.OutputTo acOutputReport, "MyReport", acFormatPDF, "Fname" was wrong:


DoCmd.OutputTo acOutputReport, "MyReport", acFormatPDF, Fname </pre>