J'ai pas trouvé mieux pour trouver l'ordonnée d'un point sur un graphique excel.
Pour y parvenir il faut connaitre la hauteur de la zone de traçage, l'échelle de l'axe des ordonnées et la valeur du point dont on veut trouver l'ordonnée ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
'Trouver l'ordonnée (Y) d'un point.
Dim YValMin As Double
Dim YValMax As Double
Dim HPlotArea As Double
Dim PointVal As Variant
Dim WkBookName As String
Dim WkSheetName As String
Dim SRange As String
'Remplir les variables
WkBookName = "MonClasseur.XLSM" ' Représente le nom du classeur excel
WkSheetName = "MaFeuil1" ' Représente le nom de la feuille de calcul Excel
SRange = "A1" ' Représente la cellule où est stockée la valeur du point dont on souhaite l'ordonée sur le graphique
'Lire la valeur minimum de l'axe des ordonnées.
YValMin = ActiveChart.Axes(xlValue).MinimumScale
'Lire la valeur maximum de l'axe des ordonnées.
YValMax = ActiveChart.Axes(xlValue).MaximumScale
'Lire la hauteur intérieur de la zone de traçage.
HPlotArea = ActiveChart.PlotArea.InsideHeight
'Lire la valeur du point dont on souhaite trouver l'ordonnée dans le graphique : se référer à la feuille Excel
PointVal = Workbooks("EURIBOR.XLS").Worksheets(WkSheetName).Range(SRange).Value
'Formule de l'ordonnée
y = (HPlotArea / (YValMax - YValMin)) * PointVal
 
MsgBox "Votre point " & SRange & " de valeur " & PointVal & " est à l'ordonnée " & y & " sur le graphique "
Si vous avez mieux pour le même résultat, je suis preneur !