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"
Did this solve your problem?
Sorry this didn't help.
24 people were helped by this reply