möchte per VBA in einem Diagramm die Farbe einer Markierung ändern. Dies funktioniert aber aus irgendeinem Grund nicht mit diesem Befehl:
.ForeColor.RGB = RGB(0, 176, 240)
Kann mir da jemand weiterhelfen?
VG
ActiveChart.Legend.LegendEntries(2).Select
ActiveChart.SeriesCollection(2).Select
With Selection
.MarkerStyle = 2
.MarkerSize = 6
End With
With Selection.Format.Fill
.Visible = msoTrue
.ForeColor.ObjectThemeColor = msoThemeColorText1
.ForeColor.RGB = RGB(0, 176, 240)
.ForeColor.TintAndShade = 0
.ForeColor.Brightness = 0
.Transparency = 0
.Solid
End With
Hoffe, damit ist eindeutig.Selection.Format.Fill
ist schon vorhanden, da alle anderen Änderungen umgesetzt werden. Allerdings nicht die Farbänderung/Vorgabe..ForeColor.ObjectThemeColor = msoThemeColorText1
völlig überflüssig ist, da er durch die darauffolgende (und bei dir 'nicht funktionierende') Codezeile wieder überschrieben wird. Das meine ich mit 'Aufzeichnung/Überarbeitung'. Denn wenn ich nur die Füllfarbe der Datenreihe ändern will, kicke ich alle aufgezeichneten anderen Eigenschaftsänderungen raus und lass nur noch die relevaten, d.h. die 'nicht funktionierende' stehen. In deinem Fall würde anstelle des With - End With Konstrukts nur noch
Selection.Format.Fill.ForeColor.RGB = RGB(0, 176, 240)
übrigbleiben.Um die Farbe einer Datenreihe in einem Excel-Diagramm zu ändern, kannst du die folgenden Schritte befolgen:
Zusätzlich kannst du VBA verwenden, um die Farbe einer Markierung in einem Diagramm zu ändern. Hier ist ein einfaches Beispiel:
With ActiveChart.SeriesCollection(1).Points(1).Format.Fill
.Visible = msoTrue
.ForeColor.RGB = RGB(0, 176, 240) ' Ändert die Farbe auf RGB(0, 176, 240)
.Solid
End With
.ForeColor.RGB funktioniert nicht: Stelle sicher, dass du die richtige Datenreihe und den richtigen Punkt im Diagramm ausgewählt hast. Der Befehl funktioniert möglicherweise nicht, wenn die Auswahl nicht korrekt ist..ForeColor.ObjectThemeColor, können die gewünschten Einstellungen überschreiben. Halte den Code einfach, indem du nur die notwendigen Befehle verwendest.Excel-Tortendiagramm Farben ändern: Um die Farben eines Tortendiagramms zu ändern, wähle das Diagramm aus, klicke auf die einzelnen Segmente und wähle die gewünschte Farbe über die Formatierungsoptionen.
Excel-Kreisdiagramm Farben ändern: Ähnlich wie beim Tortendiagramm kannst du die Farben der Segmente eines Kreisdiagramms ebenfalls individuell anpassen, um die visuelle Darstellung zu verbessern.
.Select und .Selection: Diese Methoden können zu unerwarteten Fehlern führen. Arbeite direkt mit den Objekten, um den Code sauberer und effizienter zu gestalten.1. Wie ändere ich die Farbe einer einzelnen Linie in einem Liniendiagramm?
Wähle die Linie im Diagramm aus, klicke mit der rechten Maustaste und wähle „Linienfarbe ändern“. Alternativ kannst du VBA verwenden:
ActiveChart.SeriesCollection(1).Format.Line.ForeColor.RGB = RGB(255, 0, 0) ' Ändert die Linienfarbe auf Rot
2. Kann ich die Farben im Diagramm automatisch ändern?
Ja, du kannst VBA verwenden, um die Farben basierend auf bestimmten Bedingungen automatisch zu ändern. Ein einfaches Skript kann helfen, dies zu erreichen.