strName = "ClienteZona = '" & Me.fgTabla.TextMatrix(i, 0) & "' and " & _
"ClienteCodigo = " & Me.fgTabla.TextMatrix(i, 1)
rst.MoveFirst
rst.Find strName ---aqui me da el problema. Ahora si la consulta la dejo sencilla me funciona bien osea si la dejo asi :
strName = "ClienteZona = '" & Me.fgTabla.TextMatrix(i, 0) & "' "
rst.MoveFirst
rst.Find strName
Lo que creo es que el recordset en su instruccion Find no soporte operadores logicos.

Cualquier ayuda me serviria de mcuho. Gracias