Positionnement automatique du curseur d'après une donnée

Bonjour j ai trouvé ça https://excel-downloads.com/threads/deplacement-curseur-en-fonction-dun-resultat.200337/?amp=1 sur un forum ça pourrait vous aider je pense il faudrait juste adapté un bout du code a votre cellule si jamais je regarderai pour vous l adapté

Cordialement 

Bonjour,

en supposant que tu déclenches la macro avec un bouton

Private Sub CommandButton1_Click()
    Set x = Cells.Find([A1], , xlValues, xlWhole, , , False) ' --- recherche la valeur X
    If Not x Is Nothing Then
    x.Select ' -------------------------------------------------- sélectionne la première valeur trouvée
    End If
End Sub

Tu peux également déclencher le code à partir d'une liste de validation, également à partir du changement de valeur en A1 etc ...

Private Sub Worksheet_Change(ByVal Target As Range)

Re,

Allez un petit coup de pouce, valeur cible comme dans ta demande et recherche la valeur dans tout l'onglet

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not Intersect(Target, [A1]) Is Nothing Then
Set x = Cells.Find([A1], , xlValues, xlWhole, , , False)
    If Not x Is Nothing Then x.Select
End If
End Sub