Problema con Finfirst

[Swat-10]

Que tal amigos, sigo con mi proyecto de hacer un sistema de inventarios, mi problema es el siguiente, hice un form el cual contiene un DataGrid, ese Grid me despliega todos los articulos del bar (llamese refrescos, jugos, aguas, vinos) y nos mesutra el stock actual, puse un boton de BUSCAR para que dependiendo sobre que campo este mi puntero ingrese un texto para buscarlo sobre esa columna, quise usar el metodo de findfirst para que me encuentre el primer dato encontrado, pero no me aparece la opcion completo es decir FINDFIRST no existe solo me sale FIND, miren el codigo que uso es el siguiente

Private Sub Bucar_cmd_Click()
Dim Busca As String, Campo As String
Dim rstemp As Recordset


Campo = DataGrid1.Columns(DataGrid1.Col).DataField
Busca = InputBox("Buscar en la columna" & Campo)
rstemp.Findfirst (Campo & "=*" & Busca & "*")


End Sub

Asi deberia de funcionar, pero resulta que al ejecutar el programa me cuando le pido buscar el exto que escribi me sale el sig msj:

"Variable de tipo Object o la variable de bloque With no esta establecida"

Al checar que pasaba pude observar que la opcion completa de findfirst no esta disponible (adjunto imagen), ojala alguien puede ayudarme y decirme que estoy haciendo mal gracias

Swat

PD no se como adjuntar la imagen ejjejej