trouver où est située une valeur dans une plage de données

  • Initiateur de la discussion liline
  • Date de début
L

liline

Guest
J'utilise un inputbox pour que l'utilisateur entre une valeur. lorsqu'il clique sur "ok", le programme doit chercher où se trouve cette valeur (dans une plage de données fixe) et doit inscrire dans un Msgbox les coordonnées de la cellule où se trouve cette valeur.

Merci de votre aide !
 
Y

Yo

Guest
Essaye ça

Si XXX est la valeur recuperée par l'inputbox, le code ci-dessous recherche la valeur dans la plage A1:A500


With Range("a1:a500")
Set c = .Find(XXX, LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
Do
Msgbox ("Trouvé : ligne " &c.row &" colonne " &c.column
Set c = .FindNext(c)
Loop While Not c Is Nothing And c.Address <> firstAddress
End If
End With
MsgBox ("Trouvé : ligne " & c.Row & " - colonne " & c.Column)
 

Discussions similaires

Statistiques des forums

Discussions
314 655
Messages
2 111 605
Membres
111 217
dernier inscrit
aladinkabeya2