Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

FOR EACH NEXT

R

Rhodan

Guest
bonjour , je traine toujours un petit pb ...
j'essaye de metre des barres d'histogramme avec des couleurs différentes selon leur valeurs... enutilisant la FOR EACH NEXT.
par contre j'ai du mal pour la la synthaxe....
quelqu'un peut m'aider SVP..
sachant que le nombre des séries et de points peuvent changer via une macro.


For Each SeriesCollection In ChartObjects("Graphique 7715")
For Each Points In SeriesCollection
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
Next
Next

merci
 
S

sylsyl

Guest
Salut Rhodan,

voici ce que dit l'aide VBA:

For Each element In group
[statements]
[Exit For]
[statements]
Next [element]

voici donc, ce que tu devrais ecrire...

For Each SeriesCollection In ChartObjects("Graphique 7715")
For Each Points In SeriesCollection
With Selection.Interior
.ColorIndex = 3
.Pattern = xlSolid
End With
Next Points
Next SeriesCollection

le "element" dans "Next element" est optinal seulement quand tu as qu'une boucle...

A++, Sylsyl.
 

Discussions similaires

Réponses
1
Affichages
333
Réponses
0
Affichages
280
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…