Does anyone know how I can stop the above error happening?
between these lines in the function:
For Each fld In rst.Fields
If rst.RecordCount = 0 Then
Msgbox "There are no records to export"
24 people were helped by this reply
Did this solve your problem?
Sorry this didn't help.
Great! Thanks for marking this as the answer.
How satisfied are you with this reply?
Thanks for your feedback, it helps us improve the site.
How satisfied are you with this response?
Thanks for your feedback.