[VBA-E] Détecter la séléction d'une céllule

:trouve:
Ca y est, j'ai la solution à mon problème.
Il suffisait de faire :

Code:

---

1 2 3 4 5 6

Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$C$1" Then Application.Goto Reference:=ActiveSheet.Range("A5"), Scroll:=True Range("B40").End(xlUp).Offset(1, 0).Activate End If End sub

---

Bonne fin de journée à tous!