Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Bonjour,
j'ai une graphique avec plein de courbes de différentes couleurs. Comment puis-je mettre toutes le courbes de la même couleur de façon simple et rapide?
Merci d'avance pour vos réponse.
Tu peux créer ta première série avec la couleur désirée. Puis avec les flêches tu sélectionnes les autres séries et avec la touchez F4 tu refais la mise en forme des autres séries comme ta première.
Merci.
Mais ces méthodes sont fastidieuses quand il y a des dizaines de courbes qui sont toutes les unes sur les autres. Et surtout quand j'ai des dizaines de graphes de ce genre à traiter tous les jours.
N'existe-t-il pas une méthode qui, en une action, me met directement toutes les courbes de la même couleur?
Application.ScreenUpdating = False
For Each cho In ActiveSheet.ChartObjects
cho.Select
For Each scl In ActiveChart.SeriesCollection
With scl.Border
.ColorIndex = 1
End With
Next scl
Next cho
Tu fais Alt + F11, tu arrives dans l'éditeur VBE (Visual Basic Editor)
à gauche, tu vois apparaître le nom des feuilles (Feuil1, Feuil2....ThisWorkbook)
Clic droit sur un de ces noms, et choisis Insertion/Module
Tu as alors une page blanche
copies et colle ce code :
Code:
Sub colorie()
Application.ScreenUpdating = False
For Each cho In ActiveSheet.ChartObjects
cho.Select
For Each scl In ActiveChart.SeriesCollection
With scl.Border
.ColorIndex = 1
End With
Next scl
Next cho
End Sub
Ensuite, tu reviens sur la feuille qui contient les graphiques
tu dessines un objet (un rond, un carré, ce que tu veux, à partir de la barre d'outils Dessin)
clic droit sur ce dessin, Choisis Affecter une macro
dans la boîte qui s'ouvre, clic sur "colorie" et OK
Sélectionne une cellule quelconque
puis reviens sur ton dessin, tu vois une petite main apparaître (cela veut dire que ce dessin est affecté à un code)
appuies dessus, et regarde ce qui se passe (si ça marche du premier coup)
si ce la ne fonctionne pas, tu auras une vilaine boîte, avec quelques boutons, dont Débogage
clique dessus, et reviens pour dire sur quelle ligne (en jaune), cela a planté
clique sur le carré noir en haut pour stopper la macro
Sinon, mets un exemple de ton fichier ici, sans données confidentielles (enlèves les noms)
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD