visto che lavori direttamente in access, secondo me ti conviene creare innanzi tutto una query direttamente sul db;
poi assegni al recordset la query:

Dim RJet As Recordset
Dim filtro as String

filtro=" Where nomecampo = '" & stringa & "' AND nomecampo = '" & stringa & "'"

Set RJet = CurrentDB.OpenRecordset(nomequery & filtro)

dovrebbe funzionare, è un po' che non lavoro in access, quindi sono andata un po' a memoria.