pb avec une comparaison sous VBA

Bonjour,

je cherche a créer une macro qui me permette de rechercher parmi des données un nom ou un numéro bien précis, mais je rencontre un problème. Je ne sais pas comment faire la comparaison entre le nom que j'ai rentré et ceux contenu dans ma feuille excel. Pourriez vous m'aider s'il vous plait. je vous envoie la boucle que j'ai
créé.


Merci d'avance pour votre réponse

Sub activesheet()
Dim rep As String
Dim i As Integer
Dim b As String
b = 'B'
rep = InputBox('Veuillez rentrer le nom recherché')
For i = 4 To 1000
If rep = Feuil2.Cells.AddressLocal(4, b) Then
MsgBox (Feuil2.Cells.AddressLocal(4, b))
End If
Next i
End Sub

PS : Si vous avez d'autres idées de boucles, n'hésitez pas à me le faire savoir ex :
application.find (que je ne maîtrise pas...)

Tuor