XL 2019 Graph Camenbert avec double proportion

[carlos]

Bonsoir,
Est il possible de créér un graphique en camenbert avec 3 couleurs (Maxi 5) representant les choix et en respectant les proportions dans le choix lui meme et dans tous les choix?
Proportion dans le choix et proportion dans tous les choix.
Voir le dessin schématique ci dessous et PJ .
Désolé pour mes piètres qualités de dessinateur
Bonne soirée

 

[carlos]

En tout cas j'ai fait ce que je proposai. Il suffit de sélectionner le groupe de coches à enlever ou remettre.

Bonjour Dranreb,
Je vais essayer d'intégrer vos propositions dans mon fichier mais je ne suis pas certain de tout comprendre.
Merci pour votre travail et votre investissement
Je vous tiens au courant de mes avancées
Cordialelment

 

[carlos]

Bonjour Dranreb,
Suite à votre message, j'ai refait une tentative d'integration de vos propositions dans mon projet.
Et effectivement c''etait plus simple que je pensais grace à votre excellent travail.
Et je peux en plus mieux modifier le code pour mon usage.
C'est Genial.
Merci beaucoup

 

[carlos]

Bonjour,
@Dranreb , ce message s'adresse surtout à Dranreb qui a aussi répondu et résolu une autre demande pour supprimer les noms de colonne d'une feuille d'un projet. Ce code marchait très bien jusqu'à ce je supprime les noms de colonne d'une autre feuille que la Feuil9.
Je ne comprends pas pourquoi la feuil9 est impactée.

 

[Dranreb]

Bonjour.
En voila justement un, un exemple de nom qui n'avait pas de RefersToRange !
Vous avez dû supprimer ce nom parce que vous confondiez les noms définis au niveau d'une feuille et les noms se référant à une plage d'une certaine feuille.

 

[carlos]

Bonjour Dranreb,
Effectivement je ne comprends pas trop la différence entre : "les noms définis au niveau d'une feuille et les noms se référant à une plage d'une certaine feuille".
Et je ne retrouve pas le post ou vous en parliez.
C'est possible de "remettre " la Feuil9.names("EnCouleurs").refersto = True?

 

[Dranreb]

Les deux notions n'ont en fait rien à voir. Un nom niveau feuille peut très bien se référer à une plage d'une autre feuille (bien que j'évite de le faire), ou à aucune plage du tout.
C'est la présence ou l'absence d'un préfixe Feuille! devant le nom qui définit son "Étendue" comme est appelée sa portée dans le gestionnaire de noms.
C'est là que j'en parle :

XL 2019 - Supprimer noms des colonnes d'une feuille

Bonjour, J'aimerais effacer les noms attribués aux colonnes avec ce code mais cela ne marche pas. Private Sub CommandButton1_Click() Dim N As Name With Worksheets("Test") For Each N In .Names N.Delete Next End With Merci

excel-downloads.com

Le plus simple c'est peut être d'exécuter dans une Sub temporaire Feuil9.Names.Add "EnCouleurs", True

 

[carlos]

Caaaaaaaaaaaaaaaaaa Marrrrrrrrrrche,
Trop fort Dranreb.
Vous avez toujours une solution pertinente à proposer.
Merci beaucoup

 

[carlos]

Bonjour,
J'ai tenté de réutiliser le travail de Dranreb sur un autre projet mais j'ai un blocage sur : Clr As Couleur avec message erreur : Type defini par utilisateur non defini..
Je ne vois pas pourquoi ca marche dans mon autre projet et pas celui ci.
Merci

 

[Dranreb]

Bonsoir.
Vous n'avez pas dû glisser/déplacer le module de classe Couleur du projet VBA source vers le nouveau projet.

 

[carlos]

Bonjour Dranreb,
C'est exactement cela.
Merci

 

[carlos]

Bonsoir le forum, Dranreb,
Merci encore pour ton travail qui répond parfaitement à mes attentes.
J'ai un petit souci car les "CA" ne sont plus de la même couleur et le noir m'empechede voir le contenu
J'utilisé parfois une trentaine de lignes différentes car j'ai beaucoup d'activiités différentes. C'est peut etre cela le probleme?

 

[Dranreb]

Bonsoir.
Le mieux ç'aurait été de repartir du classeur qui marchait et de copier les données dans le tableau.
Joignez votre classeur par que là je pense qu'il y a quelque chose qui ne s'exécute plus, à commencer par le classement du tableau sur les CA.

 

[carlos]

Bonjour Dranreb,
J'ai résolu le probleme en repartant du classeur qui marchait comme tu m'as dis et ca marche.
Merci