Re: DoCmd.OpenReport Error
1) On your form, I would add a label called "Lbl_WorkingOn"
2) In your existing code, just after
LoopedFieldValue = rs.Fields(LoopedField)
Me.Lbl_WorkingOn.Caption = "Outputting report for " & LoopedFieldValue
3) After you are done with your loop I would add
Me.Lbl_WorkingOn.Caption = ""
This would display which report you export only while exporting. It would also give you an idea of how long each report takes to make.
If you really wanted to get tricky you can also put the time each starts up. That would let you, the programmer, know if something seems strange.