Find en excel con vb

[David]

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)