Bonjour, Bonjour Eric et désolé de contredire ton exposer..
Voir cette démo..
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Je sélectionne C4:F19
Debug.Print Target.Count '= 64
Debug.Print Target.Row '= 4 1ère ligne de la sélection.
Debug.Print Target.Rows.Count '=16 soit 16 lignes dans la sélection
Debug.Print Target.Column '=3 1ère colonne de la sélection
Debug.Print Target.Columns.Count '=4 soit 4 colonnes dans la sélection
End Sub
On peu aussi définir le cellule.. par exemple D6 avec
Debug.Print Cells(Target.Row + 2, Target.Column + 1)
ou
Debug.Print Cells(Target.Row, Target.Column).Offset(2, 1)
A+
Edit, heuuu c'est peut-être pas contredire mais expliciter.