I know this thread is old, it had the type of question I wanted answered but not the solution unfortunately. I eventually found a solution that was right for me and thought it might be useful for others that come across it.
Option Compare Database
Option Explicit
Dim rs As dao.Recordset...