VBA Excel recuperer des coordonnées pt

J'ai besoin de recuperer l'adresse du point qui a été selectionné precisement sur le graphique.

exemple : je selectionne le point 10 par un clique gauche et je souhaite ensuite lancer une macro qui récupere les coordonnées en x et y

merci

C'est bien ce que j'avais compris...
Tu cliques sur le lien bleu que je t'ai mis, tu lis, et tu télécharges le fichier exemple.
eric

Ci joint la solution, si ca peut aider quelqu'un ...
Cordialement


Sub etiquetteG1()

' Pour graphique excel 2010 nuage de point xy
' Selectionner 1 pt par un clique gauche et lancer la macro ci dessous pour obtenir les coordonnées du pt en x et y dans les variables : valeurY et valeurX


Dim valeurY, valeurX
Dim val2
Dim nbcarractere


Selection.MarkerSize = 6 'dimension du marker
With Selection
.MarkerBackgroundColorIndex = 3 'marker en rouge
End With


With Selection.ApplyDataLabels 'faire apparaitre le label
End With
Selection.DataLabel.Select
Selection.ShowCategoryName = 0 'si = 0 : Y visible si = -1 : X et Y visible
Selection.Separator = " "
Selection.Font.Size = 8

valeurY = Selection.Characters.Text
val2 = Selection.Name 'renvoie : "Texte S1P158" (serie1 point 158)
nbcarractere = Len(val2) 'nombre de carractere : Texte S1P158 = 12
nbcarractere = nbcarractere - 9 ' = 3 , pour isoler le N° de point 158
valeurX = Right(val2, nbcarractere) ' X = 158


End Sub