SalomonSab, eso es para VB6 no para VBA. 
Para VBA podrías indexar el campo en el que deseas buscar y hacer lo siguiente: 
Código:
 Dim Rs As Recordset
Set Rs = CurrentDb.OpenRecordset("Tabla")
Rs.Index = "Campo" 'Debe estar indexado
Rs.Seek "=", "Criterio a Buscar"
'Luego en Rs.Fields obtendrás los campos, primero compara con Rs.NoMatch si hubo coindidencias