Changement couleur élipse au clic
Résolu/Fermé
ath80
Messages postés
208
Date d'inscription
dimanche 15 juillet 2007
Statut
Membre
Dernière intervention
15 mars 2018
-
7 nov. 2016 à 16:48
ath80 Messages postés 208 Date d'inscription dimanche 15 juillet 2007 Statut Membre Dernière intervention 15 mars 2018 - 17 nov. 2016 à 16:05
ath80 Messages postés 208 Date d'inscription dimanche 15 juillet 2007 Statut Membre Dernière intervention 15 mars 2018 - 17 nov. 2016 à 16:05
A voir également:
- Changement couleur élipse au clic
- Changement dns - Guide
- Excel cellule couleur si condition texte - Guide
- Changement d'écriture - Guide
- Somme si couleur - Guide
- La boite a couleur - Télécharger - Divers Photo & Graphisme
8 réponses
Raymond PENTIER
Messages postés
58798
Date d'inscription
lundi 13 août 2007
Statut
Contributeur
Dernière intervention
6 janvier 2025
17 263
7 nov. 2016 à 17:38
7 nov. 2016 à 17:38
Bonjour.
Seule une macro pourrait permettre ça.
Tu es prêt à te mettre à VBA ?
Seule une macro pourrait permettre ça.
Tu es prêt à te mettre à VBA ?
ath80
Messages postés
208
Date d'inscription
dimanche 15 juillet 2007
Statut
Membre
Dernière intervention
15 mars 2018
9
15 nov. 2016 à 10:39
15 nov. 2016 à 10:39
Bonjour,
Personne ne peut m'aider ? Ce n'est peut être pas réalisable ?
Personne ne peut m'aider ? Ce n'est peut être pas réalisable ?
ccm81
Messages postés
10905
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
27 décembre 2024
2 429
15 nov. 2016 à 11:53
15 nov. 2016 à 11:53
Bonjour à tous
Un petit exemple (macro) pour modifier la coulmeur d'une forme
http://www.cjoint.com/c/FKpk0XVayuK
Cdlmnt
Un petit exemple (macro) pour modifier la coulmeur d'une forme
http://www.cjoint.com/c/FKpk0XVayuK
Cdlmnt
ath80
Messages postés
208
Date d'inscription
dimanche 15 juillet 2007
Statut
Membre
Dernière intervention
15 mars 2018
9
15 nov. 2016 à 16:42
15 nov. 2016 à 16:42
Bonjour,
Merci pour la réponse ! Maintenant il faut que je l'adapte à mon cas.
Je pensais qu'il suffisait de modifier les nombres et qu'il y avait un code couleur (j'ai cherché le code couleur sur internet) mais quand je change les numéros ça ne fonctionne pas. Quand je clique sur l'étoile plus rien ne se passe.
Const cbr = 19
Const car = 55
Const cor = 13
Const cbl = 9
De plus, est-il possible d'avoir un fond transparent pour l'un des 4 états ?
Merci.
Merci pour la réponse ! Maintenant il faut que je l'adapte à mon cas.
Je pensais qu'il suffisait de modifier les nombres et qu'il y avait un code couleur (j'ai cherché le code couleur sur internet) mais quand je change les numéros ça ne fonctionne pas. Quand je clique sur l'étoile plus rien ne se passe.
Const cbr = 19
Const car = 55
Const cor = 13
Const cbl = 9
De plus, est-il possible d'avoir un fond transparent pour l'un des 4 états ?
Merci.
ccm81
Messages postés
10905
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
27 décembre 2024
2 429
Modifié par ccm81 le 15/11/2016 à 18:37
Modifié par ccm81 le 15/11/2016 à 18:37
Vois ceci
http://www.cjoint.com/c/FKprILmliMK
PS. le code couleur est écrit dans l'étoile
Cdlmnt
http://www.cjoint.com/c/FKprILmliMK
PS. le code couleur est écrit dans l'étoile
Cdlmnt
ath80
Messages postés
208
Date d'inscription
dimanche 15 juillet 2007
Statut
Membre
Dernière intervention
15 mars 2018
9
16 nov. 2016 à 10:18
16 nov. 2016 à 10:18
Merci !
Dans un premier temps, le code couleur que j'avais trouvé sur le net n'était pas le même.
J'ai adapté le fichier à mon attente:
https://www.cjoint.com/c/FKqjmOMgjZD
Il y a surement une manip que je ne réalise pas car la couleur ne change plus lorsque je clique sur l'étoile ...
Dans un second temps, je constate qu'il n'est pas possible d'obtenir un fond de forme transparent avec cette méthode ?
Dans un premier temps, le code couleur que j'avais trouvé sur le net n'était pas le même.
J'ai adapté le fichier à mon attente:
https://www.cjoint.com/c/FKqjmOMgjZD
Il y a surement une manip que je ne réalise pas car la couleur ne change plus lorsque je clique sur l'étoile ...
Dans un second temps, je constate qu'il n'est pas possible d'obtenir un fond de forme transparent avec cette méthode ?
ccm81
Messages postés
10905
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
27 décembre 2024
2 429
16 nov. 2016 à 13:25
16 nov. 2016 à 13:25
ce n'est pas le fichier que je t'ai envoyé au post #6
ath80
Messages postés
208
Date d'inscription
dimanche 15 juillet 2007
Statut
Membre
Dernière intervention
15 mars 2018
9
17 nov. 2016 à 09:24
17 nov. 2016 à 09:24
J'ai réussi à faire ceci pour une forme:
https://www.cjoint.com/c/FKribz50MLp
J'ai essayé d'appliquer celle-ci à la forme 2. J'ai changé le "1" en "2" mais ça ne fonctionne pas :
ActiveSheet.Shapes(2).Select
Selection.ShapeRange(2).Fill.ForeColor.SchemeColor = coul
Ensuite, je souhaiterai appliquer la macro du fichier à une multitude de formes. Je voudrais changer la couleur de chaque forme indépendemment. Serait-il possible de réaliser une macro la plus courte possible afin de ne pas copier 100 fois la macro si j'ai 100 formes. Il faut certainement ajouter des n ou autre chose mais je ne sais pas comment procéder ...
https://www.cjoint.com/c/FKribz50MLp
J'ai essayé d'appliquer celle-ci à la forme 2. J'ai changé le "1" en "2" mais ça ne fonctionne pas :
ActiveSheet.Shapes(2).Select
Selection.ShapeRange(2).Fill.ForeColor.SchemeColor = coul
Ensuite, je souhaiterai appliquer la macro du fichier à une multitude de formes. Je voudrais changer la couleur de chaque forme indépendemment. Serait-il possible de réaliser une macro la plus courte possible afin de ne pas copier 100 fois la macro si j'ai 100 formes. Il faut certainement ajouter des n ou autre chose mais je ne sais pas comment procéder ...
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 249
15 nov. 2016 à 18:27
15 nov. 2016 à 18:27
Bonjour à tous,
Autre proposition.
Tes formes modèles doivent avoir un nom qui commence par "couleur".
Les autres formes doivent avoir chacune un nom différent (si tu copies-colles une forme elle est présente 2 fois avec le même nom et forcément ça fonctionne moins bien)
Cliquer sur le modèle voulu (pas d'avertissement de bonne sélection, je pense que ça aurait été gonflant à l'usage) puis sur les formes où appliquer le modèle.
La sélection d'une cellule annule la pré-sélection du modèle, ce qui permet de pouvoir faire une autre action au clic.
https://www.cjoint.com/c/FKprAKCecQW
eric
Autre proposition.
Tes formes modèles doivent avoir un nom qui commence par "couleur".
Les autres formes doivent avoir chacune un nom différent (si tu copies-colles une forme elle est présente 2 fois avec le même nom et forcément ça fonctionne moins bien)
Cliquer sur le modèle voulu (pas d'avertissement de bonne sélection, je pense que ça aurait été gonflant à l'usage) puis sur les formes où appliquer le modèle.
La sélection d'une cellule annule la pré-sélection du modèle, ce qui permet de pouvoir faire une autre action au clic.
https://www.cjoint.com/c/FKprAKCecQW
eric
ath80
Messages postés
208
Date d'inscription
dimanche 15 juillet 2007
Statut
Membre
Dernière intervention
15 mars 2018
9
17 nov. 2016 à 09:33
17 nov. 2016 à 09:33
Bonjour,
Merci pour ta réponse.
C'est une variante de ce que je voudrais faire mais j'utiliserai cette solution en cas de dernier recours. Je souhaiterai qu'au clic sur une même forme l'état change directement (voir fichier post 10). Il faut juste que je trouve comment adapter le code lorsqu'il y a une multitude de formes.
Merci pour ta réponse.
C'est une variante de ce que je voudrais faire mais j'utiliserai cette solution en cas de dernier recours. Je souhaiterai qu'au clic sur une même forme l'état change directement (voir fichier post 10). Il faut juste que je trouve comment adapter le code lorsqu'il y a une multitude de formes.
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 249
17 nov. 2016 à 11:43
17 nov. 2016 à 11:43
Bonjour,
3 jours pour prendre en compte ma réponse c'est trop.
Je n'y passerai pas plus de temps.
eric
3 jours pour prendre en compte ma réponse c'est trop.
Je n'y passerai pas plus de temps.
eric
ath80
Messages postés
208
Date d'inscription
dimanche 15 juillet 2007
Statut
Membre
Dernière intervention
15 mars 2018
9
17 nov. 2016 à 13:50
17 nov. 2016 à 13:50
Désolé mais je n'avais pas vu le message.
17 nov. 2016 à 09:33 - 15 nov. 2016 à 18:27 = 1,5 jours
Merci tout de même pour votre aide.
17 nov. 2016 à 09:33 - 15 nov. 2016 à 18:27 = 1,5 jours
Merci tout de même pour votre aide.
ccm81
Messages postés
10905
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
27 décembre 2024
2 429
17 nov. 2016 à 14:41
17 nov. 2016 à 14:41
Essaies ceci
http://www.cjoint.com/c/FKrnOR4NreK
Cdlmnt
http://www.cjoint.com/c/FKrnOR4NreK
Cdlmnt
eriiic
Messages postés
24603
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
15 décembre 2024
7 249
17 nov. 2016 à 15:30
17 nov. 2016 à 15:30
Admettons...
ou bien https://www.cjoint.com/c/FKroEl5wzHc
eric
ou bien https://www.cjoint.com/c/FKroEl5wzHc
eric
ath80
Messages postés
208
Date d'inscription
dimanche 15 juillet 2007
Statut
Membre
Dernière intervention
15 mars 2018
9
17 nov. 2016 à 16:05
17 nov. 2016 à 16:05
Merci beaucoup à vous !
8 nov. 2016 à 07:41
Tout à fait. Je savais que seul une macro pourrait m'aider mais je ne sais pas comment procéder.