Hola!!
Primero abres el archivo de excel
Segundo le pasas el parameto "TEXTO"
Tercero ejecutas el codigo:
Código vb:
Ver originalCells.Find(What:="TEXTO", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
MsgBox ActiveCell.Address
Como resultado, te selecciona la palabra que buscas y trae la ubicación en este formato: $COLUMNA$FILA
Es codigo de VBA, adaptalo a VB6.0, usualmente debe de funcionar sin problemas