Ciao Kleiko,
ecco questo codice semplice semplice che fa di sicuro al caso tuo!!!

Andrea

codice:
Dim xlsCurrentFind As Excel.Range

xlsCurrentFind = xlsRange.Find("testo da ricercare", , _
                        Excel.XlFindLookIn.xlValues, Excel.XlLookAt.xlPart, _
                        Excel.XlSearchOrder.xlByRows, Excel.XlSearchDirection.xlPrevious, False)
If Not xlsCurrentFind Is Nothing Then
      ' testo trovato alla riga xlsCurrentFind.Row
     riga = xlsCurrentFind.Row
else
     ' testo ricercato non trovato
endif