Dans MS Excel, comment puis-je créer un graphique à bulles dans lequel la couleur des bulles correspond à la couleur d'une cellule?

J'aimerais illustrer une quatrième variable (axe x, axe y, taille de la bulle, couleur de la bulle), mais je ne souhaite pas scinder artificiellement la série en groupes prédéfinis en fonction d'un ensemble de seuils. Je veux plutôt que chaque bulle reflète les couleurs particulières d'une cellule (qui sera colorée par un formatage conditionnel basé sur la quatrième variable).

Quelqu'un sait-il comment faire ça?

Comment ça marche:

1. Entrez data & amp; Remplir les couleurs.
2. Cliquez sur Insérer , Insérer un nuage (X, Y) ou Diagramme à bulles et sélectionnez le graphique à bulles.
3. Faites un clic droit sur le graphique et cliquez sur Sélectionner Les données du menu.
4. Du Sélectionnez la source de données Cliquez sur Ajouter & amp; sélectionner les cellules relatives pour Série de données .
5. Pour la première zone de texte, sélectionnez la cellule A1 & amp; au dessous de cellules pour d'autres zones de texte comme A2, A3, A4.
6. Répétez l'étape 5 pour la colonne B & amp; C et fini avec D'accord.

7. Copier & amp; Coller ce code VB en tant que module standard avec la feuille.

   Option Explicit
   
   Sub ColorChartSeries()
   Dim iRow As Long, iCol As Long
   Dim theBubbles As Range
   Dim theChart As Chart
   Dim theSeries As Series
   Dim thePoint As Point
   
   Set theChart = ActiveChart
   
   If (theChart.ChartType <> xlBubble And theChart.ChartType <> xlBubble3DEffect) Then
       MsgBox "This works only for bubble charts!"
       End
   End If
   
   For Each theSeries In theChart.SeriesCollection
       Set theBubbles = Range(theSeries.BubbleSizes)
       iRow = theBubbles.Row - 1
       iCol = theBubbles.Column
       For Each thePoint In theSeries.Points
           iRow = iRow + 1
           thePoint.Format.Fill.ForeColor.RGB = Cells(iRow, iCol).Interior.Color
       Next thePoint
   Next theSeries
   
   End Sub
   

8. Finalement, sélectionnez la zone de graphique & amp; Exécuter le Code.

Vous obtenez les couleurs de bulle similaires à celles du remplissage   Couleurs de cellules.

Remarque, Cette méthode n'obtient jamais les couleurs de cellules mises en forme conditionnellement.