Cita:
Iniciado por David el Grande 
En vez de definir ret como Boolean, defínelo como Object y usa así:
Código PHP:
Set ret = AppXls.ActiveWorkbook.Sheets(Hoja).Application.Cells.Find(What:=TextoFind, _
LookAt:=1, _
SearchOrder:=1, _
MatchCase:=Match_Case)
Gracias David, la defini como object, el problema es al validar cuando existe que realice algo como copiar el registro a un archivo, cuando no existe, que lea el proximo registro.
Persiste esta pequeña falla, pero tu consejo me sirvio, solamente que cuando no existe y roduce error, continuo el programa con Resumen Next.