Recherche texte dans une feuille

Bonjour

Je suis en train de m'arracher les cheveux car je n'arrive pas à trouver une macro simple pour chercher un texte dans une feulle excel.

Ca parait bete mais je sèche !!!

Une idée quelqu'un ?

Merci

Bonjour, un exemple en pièce jointe sans macro...

Mais vraiment si vraiment il faut une macro...

sub ouaf()
Dim quoi As Variant
quoi = InputBox("Que cherche-tu!?")
MsgBox Feuil1.Cells.Find(quoi).Address
End Sub

Merci !!!!