Einzelne Farbe im Chat ändern wenn...
14.05.2008 09:22:02
FM
innerhalb eines vba skriptes erstelle ich ein Chart in einer Userform. Es funktioniert auch soweit alles.
Es handelt sich um ein Balkendiagramm (chChartTypeBarClustered3D). In diesem werden Ländern auf der Y achse angezeigt und auf der x-achse die zugehörigen % Werte. Nun würde ich gerne, wenn 100% erreicht (oder überstiegen sind) den jeweiligen Balken anders einfärben. Wie kann man das in eine If- Schleife packen?
Also derartiges (der Code ist falsch, soll aber zeigen worauf ich hinaus will...)
'If ChartSpace1.Charts(0).SeriesCollection(0).WERT GRÖßER Gleich 100% then
'ChartSpace1.Charts(0).SeriesCollection(0).Interior.Color = "red"
'end if
Danke und Gruss
Florian