VBA Loop through recordset

The solution for “VBA Loop through recordset” can be found here. The following code will assist you in solving the problem.

‘The short version
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset(“SELECT * FROM Contacts”)
If Not (rs.EOF And rs.BOF) Then
Do Until rs.EOF = True
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing

Thank you for using DeclareCode; We hope you were able to resolve the issue.

More questions on [categories-list]

Similar Posts