This compile error is misleading (and has nothing to do with the record count). The actual problem is that you have an If statement inside the For/Next loop that does not close.

Where was this line going to close with an End If?
If Err.Number = 5631 Then

__________________
Andrew Lockton
Chrysalis Design, Melbourne Australia