Has anyone experienced anything like this? I constructed a simple test db that included the following.
Code:
Dim rst As Recordset
Set rst = CurrentDb.OpenRecordset("Table2")
Do Until rst.EOF
' My code in here
Debug.Print rst!ID
rst.MoveNext
Loop
To my horror I found VBA was performing an extra iteration before exiting the Do loop. The extra iteration was for the first record in the result set. I played around with various settings to no avail. The only cure was to delete the table and reconstruct it from scratch - luckily not an arduous task. This implies that the table, not VBA, is the culprit. I have as yet not been able to recreate this error.