mettre en couleur automatiquement un point en couleur sur un nuage de points

Vilain

XLDnaute Accro
Bonjour à tous,

me revoila avec une question de plus sur les nuages de points.
Je souhaite que lorsque je met un nom en couleur (ou toute la ligne si c'est plus simple) le point correspondant se colore lui aussi.
Une macro serait parfaite je pense.

Merci d'avance.

A plus
 

Pièces jointes

  • mise en couleur d'un point.xls
    28.5 KB · Affichages: 47

Hervé

XLDnaute Barbatruc
Re : mettre en couleur automatiquement un point en couleur sur un nuage de points

salut

je suis pas un grand spécialiste des graphiques, mais pour faire avancer le schmilblik, un petit code à mettre dans la feuille du graphique.

on peut améliorer en cernant mieux l'evenement déclencheur :

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Byte

ActiveSheet.ChartObjects("Graphique 1").Activate

For i = 1 To ActiveChart.SeriesCollection(1).Points.Count
    ActiveChart.SeriesCollection(1).Points(i).MarkerBackgroundColorIndex = _
    ActiveSheet.Cells(i + 1, 3).Interior.ColorIndex
Next i
End Sub

salut
 

Discussions similaires

Statistiques des forums

Discussions
312 329
Messages
2 087 334
Membres
103 519
dernier inscrit
Thomas_grc11