Hallo VBA Experten,
habe eine frage die für euch sicher ein klacks ist.
Ich habe ein Diagramm.In diesem möchte ich per makro die farben der einzelnen Balken ändern.
Ich weiß das man in Excel am besten ohne select oder activate arbeiten soll wegen der geschwindigkeit.
Hier bekomme ich es aber nicht hin.
Hier mal ein kleines Beispiel das geht mit selection.
Application.ScreenUpdating = False
ActiveSheet.ChartObjects("Diagramm 35").Activate
y = 1
For x = 7 To 55 Step 2
farbe = fehlercode_farbe(ThisWorkbook.ActiveSheet.Cells(x, 14))
ActiveChart.SeriesCollection(y).Interior.ColorIndex = farbe
y = y + 1
Next
Application.ScreenUpdating = True
End Sub
Wenn in Statt dem selktieren damit arbeiten will geht es nicht ?
farbe = fehlercode_farbe(ThisWorkbook.ActiveSheet.Cells(x, 14))
ActiveSheet.ChartObjects("Diagramm 35").SeriesCollection(y).Interior.ColorIndex = farbe
Ich hoffe ihr habt mich verstanden.
Vielen Dank im vorraus Gruß Chris