Graph excel

Résolu
Eureka -  
Bonjour,

Peut on, lorsque l'on construit un nuage de points (ou chaque point est l'intersection de l'abscisse et de l'ordonné),nommer automatiquement chacun des points?

Par exemple:

Dans le tableau ci dessous, je souhaiterais: ( ligne 1) que le point d'intersection des valeurs "1" et "2" s'appelle "x"
( ligne 2) que le point d'intersection des valeurs "3" et "1" s'appelle "y", etc ...

x 1 2

y 3 1

z 2 2

Vous remerciant par avance de votre aide
Configuration: Windows XP
Internet Explorer 6.0
Excel 2003 / 2007

2 réponses

  1.  Raymond PENTIER Contributeur
    NON.

    Mais tu peux manuellement insérer des textes, que tu fais glisser au bon endroit ; mais c'est long, et au cas où les valeurs changent, il faur déplacer ces étiquettes une à une.
    1
    1. Eureka
      Merci, mais exactement ce que je souhaite éviter ( plusieurs centaines d'adéquations à réaliser ... )

      On m'a par ailleurs donné une solution macro qui j'espére pourra aider certains ...

      Sub AttachLabelsToPoints()
      'Dimension variables.
      Dim Counter As Integer, ChartName As String, xVals As String

      ' Disable screen updating while the subroutine is run.
      Application.ScreenUpdating = False

      'Store the formula for the first series in "xVals".
      xVals = ActiveChart.SeriesCollection(1).Formula

      'Extract the range for the data from xVals.
      xVals = Mid(xVals, InStr(InStr(xVals, ","), xVals, _
      Mid(Left(xVals, InStr(xVals, "!") - 1), 9)))
      xVals = Left(xVals, InStr(InStr(xVals, "!"), xVals, ",") - 1)
      Do While Left(xVals, 1) = ","
      xVals = Mid(xVals, 2)
      Loop

      'Attach a label to each data point in the chart.
      For Counter = 1 To Range(xVals).Cells.Count
      ActiveChart.SeriesCollection(1).Points(Counter).HasDataLabel = _
      True
      ActiveChart.SeriesCollection(1).Points(Counter).DataLabel.Text = _
      Range(xVals).Cells(Counter, 1).Offset(0, -1).Value
      Next Counter

      End Sub

      ne me demandez pas d'explications, je sais que ca marche et ca me va !!!
      0