Problema con Findfirst

[maquipo]

Quiero buscar con Findfirst pero me envia el siguiente error:
Error 13 en tiempo de ejecucion No coinciden los tipos

'Status_Persona y wEstatus son tipo Texto
'De y Hasta son tipo Numerico
' Text7 Numerico

Re_Tabla_IRS.FindFirst ("trim(Status_Persona) = '" & Trim(wESTATUS) & "'" And "Trim(str(De)) >= '" & Trim(Text7) & "'" And "trim(str(Hasta)) <= '" & Trim(Text7) & "'")

Cual es la forma correcta de esta instruccion???

Gracias.