[Excel] Annoter un point sur un graphe

0seb0 Messages postés 37 Statut Membre -  
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'ai trois colonnes "a, x et y" de 4000 lignes chacune.
Je trace un graphe 2D ("Nuage de points reliés par une courbe lissée") de la colonne "y" en fonction de "x".

Ma question :
comment annoter certains points de la courbe ainsi construite avec la valeur de "a" associée ?
Bonus : il faudrait que ça ne le fasse pas pour les 4000 points mais pour les numéros : 1000, 2000, 3000 et 4000 soit au final, 4 points annotés sur une courbe 2D.

Merci de votre aide !

5 réponses

eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Tu vas dans le menu 'affichage / barres d'outils' et tu coches 'Boite à outils Contrôles'
Dans cette barre d'outils tu sélectionnes l'outil 'étiquette' et tu fais un cliqué-glissé sur ton graphique pour le dessiner là où tu veux (tu pourras le redimensionner et le redéplacer plus précisément ensuite)
Clic-droit sur cet objet et tu choisis 'propriétés'
Tu cliques dans la zone de saisie de la propriété 'caption' et tu saisis ton texte.
Ensuite propriété 'backstyle' tu choisis 'transparent'
Avec les poignées de redimensionnement tu régles un peu mieux la taille de ton étiquette et tu la places où tu veux

Si c'est une valeur de ton tableau que tu veux afficher tu utilises un objet 'zone de texte' et dans la propriété 'linkedcell' puis tu désignes la cellule dont tu veux afficher le contenu.

eric
2
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Bonjour,

Si ça n'a pas besoin d'être dynamique tu peux utiliser 4 zones de texte que tu positionnes et remplis à la main...
eric
0
0seb0 Messages postés 37 Statut Membre 16
 
Je bidouille en ce moment un truc du style....

ActiveChart.SeriesCollection(5).Points(671).Select
With Selection.Border
.Weight = xlThin
.LineStyle = xlAutomatic
End With
With Selection
.MarkerBackgroundColorIndex = xlNone
.MarkerForegroundColorIndex = xlAutomatic
.MarkerStyle = xlNone
.MarkerSize = 5
.Shadow = False
End With

Je n'aurai pas les annotations sous forme des contenus de la colonne "a" mais je ferai 4 tailles de marqueurs pour les points 1000, 2000, 3000 et 4000. C'est pas top, mais ça ira !

N'empèche... si quelqu'un à la solution, je reste curieux de savoir. ;-)
0
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Ah, tu n'avais pas dit en vba... :-)

Sous vba tu peux même prendre un libellé et changer sa valeur par le contenu d'une cellule, mais ça je suppose que tu y avais pensé.
Maintenant si tes 4 points ne sont pas tjs à la même place sur le graphique... C'est clair que ça serait mieux si un point avait une propriété adéquate
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
0seb0 Messages postés 37 Statut Membre 16
 
Ben, en fait... je ne sais pas de quoi tu parles quand tu dis "changer la valeur d'un libellé par le contenu d'une cellule". C'est quoi le "libellé" ?

Mes 4 points ne sont pas toujours à la même place "géographique" sur le graphique mais ils sont toujours les points suivants que je sélectionne ainsi :
ActiveChart.SeriesCollection(5).Points(1000).Select
ActiveChart.SeriesCollection(5).Points(2000).Select
ActiveChart.SeriesCollection(5).Points(3000).Select
ActiveChart.SeriesCollection(5).Points(4000).Select
0