Tu idea esta buena
Código Visual Basic:
Ver originalSet rstUnFiltered = CurrentDb.OpenRecorset("Select * from DeclaracionSalidad WHERE HSNumHoj like '*G0005*'")
Agregale el Filtrado en la misma Consulta, eso si puedes hacer... y de hecho si te sale...