Associer une donnée à une couleur camembert excel Résolu/Fermé

Question

Bonjour,

Je souhaite associer une couleur à chaque donnée de mon camembert.

Par exemple :

Congé = bleu
Accident du travail = jaune
Absence sans solde = vert
Formation = rouge

Le but étant de pouvoir comparé chaque mois les camemberts avec les mêmes couleurs pour chaque motif. 

En outre, il est possible qu’en fonction des mois certaines données sont à 0 et donc inexistante dans le graphique.

Je ne veux pas le faire manuellement (en changeant les quartiers de couleurs) car j'ai beaucoup de données et ça serait une perte de temps, peut être une idée de macro? Savez-vous comment je pourrai m’y prendre ?

Merci !

via55 · Answer

Bonjour

Voir http://boisgontierjacques.free.fr/pages_site/graphiques.htm
Telecharger exemple GrapheColoriage3 qui correspond exactement à ce que tu recherches

Cdlmnt
Via

via55 · Answer

Bonjour

Chez moi cela fonctionne avec TCD+GCD pourtant
Essaie dans le code de la macro de remplacer le par le nom du graphique entre guillemets (le nom est celui qui apparait à droite de la barre de formules quand tu cliques s sur le graphique)

Sinon postes ton fichier sur mon-partage.fr, copie le lien créé et reviens le coller ici qu'on essaye de voir ce qui cloche

17leila17 · Answer

Bonjour,

Voici le lien du fichier https://mon-partage.fr/f/NfalMrHA/

Je ne vois pas ce qui bloque. L'excel partagé est un essai avant d'exporter la macro avec plus de données.

Merci encore pour votre aide !

via55 · Answer

Tout simplement que le codage couleur n'était pas sur la feuille!
Remis en col A au bon endroit (là où va le chercher la macro) c'est bon
https://mon-partage.fr/f/9xMIeqV6/

Tu peux ensuite masquer la colonne A si tu le désires

17leila17 · Answer

Ah je comprends mieux, il  faut refaire un tableau en colonne A. Merci.

La mise en forme conditionnelle ne fonctionne pas avec la macro. La macro ne voit pas que la cellule est coloré. Etant donné que j'ai 28 données, je ne peux pas les colorer à la main une à une à chaque fois. Est-ce qu'il y a une autre formule/code qui permettrait de colorer les cellules en colonne A ?

J'ai trouvé ce code qui pourrait aider. Mais comment puis-je intégrer toutes mes données? 

Sub Change_Couleur() 
   If Sheets("Feuil1").Range("A1").Value = "Absence" Then 
      Sheets("Feuil1").Range("a1").Interior.ColorIndex = 6
   Else 
      Sheets("Feuil1").Range("a1").Interior.ColorIndex = 0
   End If 
End Sub

via55 · Answer

Pourquoi veux tu recolorer à chaque fois ?
Tu mets en A1 la liste des 28 items et tu les colores une fois pour toute
Après si seulement certains items sont dans le camembert peu importe, ils seront colorés selon ta légende

Où alors il y a quelque chose que je n'ai pas compris

17leila17 · Answer

Ca ne fonctionne pas si une donnée n'est pas présente dans le camembert et si on fait un simple copié-collé en colonne A de toutes les données. 

Voir ce que ça donne : https://mon-partage.fr/f/z1eH0lKX/

En effet,  il faut que toutes les données soient présentes dans le camembert car la macro prends case par case les couleurs. Si une donnée n'est pas dans le camembert, elle prendra la couleur d'une autre case. 

C'est pour ça que je pensais faire une boucle en VBA qui colorie la case en fonction de son contenu car la mise en forme conditionnelle ne fonctionne pas avec la macro utilisé.

via55 · Answer

Oui alors en rajoutant une colonne de comptage en col B
Les items de la colonne A doivent impérativement être classés en ordre alphabétique croissant (comme dans le TCD)
https://mon-partage.fr/f/3xG0q5oh/

via55 · Answer

De plus selon les couleurs choisies certaines peuvent ne pas être retranscrites fidèlement par la macro
Si c'est le cas remplace dans la macro les ColorIndex  par Color simplement

17leila17 · Answer

Merci c'est parfait ! Ca marche parfaitement !

Bonne journée