Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Farbe in Diagramm ändern

Farbe in Diagramm ändern
14.06.2017 08:14:14
Thomas
Guten Morgen VBA-Experten,
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
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Farbe in Diagramm ändern
14.06.2017 08:40:34
EtoPHG
Hallo Thomas,
Das ist eine super-Angabe für Excel gut
Da man keine Ahnung hat, was für eine Objekt referenziert wird, dürfte das irgendeinen Grund haben!
Gruess Hansueli
AW: Farbe in Diagramm ändern
14.06.2017 08:59:39
Thomas
Hallo zusammen,
hier der gesamte Code:
    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.
VG
Anzeige
AW: Farbe in Diagramm ändern
14.06.2017 09:14:57
EtoPHG
Thomas,
Da ich es grundsätzlich vermeide mit .Select und Selection zu arbeiten, kann ich nicht sagen, wo der Fehler liegt.
Der Code sieht mir nach Makroaufzeichnung/Überarbeitung aus und die Fehlerbeschreibung "funktioniert nicht" ist nichtssagend.
Mal im Überwachungsfenster die Selection analysieren, ob da wirklich eine Objekt Selection.Format.Fill vorhanden ist.
Gruess Hansueli
Anzeige
AW: Farbe in Diagramm ändern
14.06.2017 09:36:36
Thomas
Hallo Hansueli,
Selection.Format.Fill
ist schon vorhanden, da alle anderen Änderungen umgesetzt werden. Allerdings nicht die Farbänderung/Vorgabe.
Und ja, das hab ich mit dem Makroaufzeichnung aufgenommen, versteh aber auch nicht was daran so schlimm seien soll. Den großen Plan hab ich von VBA auch nicht, hab ich aber auch nicht geschrieben.
Allerdings versteh ich jetzt nicht wirklich, wo da was "nichtssagend" dran seien soll!
Aber wenn es dich nervt, musst Du ja auch nicht auf Beiträge antworten.
Ansonsten kann eine gezielteres Nachfragen deinerseits alle Unklarheiten beseitigen.
Bisher wurde mir in diesem Forum von den Teilnehmern, die von VBA mehr verstehen wie ich, immer kompetent geholfen.
Aber Danke für dein Feedback.
Gruesse Thomas
Anzeige
AW: Farbe in Diagramm ändern
14.06.2017 10:19:31
EtoPHG
Hallo Thomas,
Zitat: ..., da alle anderen Änderungen umgesetzt werden.
und wie kontrollierst du das? Setzt du alle Eigenschaften auf einen anderen Wert, wie den neuen, durch den Code zu ersetzenden?
Ich kann deinen Fehler nicht nachvollziehen und habe es nun an einem Diagramm mit deinem Code getestet. Stelle aber fest, dass z.B. der Befehl:
.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.
Gruess Hansueli
Anzeige
oT: hier nur mal kurz nachgefragt ...
14.06.2017 10:26:00
...
Hallo Hansueli,
... gibt es Deinerseits neuere Erkenntnisse zu meiner Anfrage?
Gruß Werner
.. , - ...

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Farbe in Diagramm ändern


Schritt-für-Schritt-Anleitung

Um die Farbe einer Datenreihe in einem Excel-Diagramm zu ändern, kannst du die folgenden Schritte befolgen:

  1. Diagramm auswählen: Klicke auf das Diagramm, in dem du die Farbe ändern möchtest.
  2. Datenreihe auswählen: Klicke auf die spezifische Datenreihe, deren Farbe du ändern möchtest.
  3. Rechtsklick: Klicke mit der rechten Maustaste auf die ausgewählte Datenreihe und wähle „Datenreihe formatieren“.
  4. Farbe ändern: Wähle im Menü „Füllung“ oder „Linienfarbe“ die gewünschte Farbe aus. Du kannst auch RGB-Werte verwenden, um eine spezifische Farbe zu wählen.
  5. Diagramm-Hintergrund anpassen: Um den Hintergrund des Diagramms zu ändern, gehe zu „Diagramm formatieren“ und wähle „Hintergrund“.

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

Häufige Fehler und Lösungen

  • Fehler: .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.
  • Überflüssige Befehle: Einige Befehle, wie .ForeColor.ObjectThemeColor, können die gewünschten Einstellungen überschreiben. Halte den Code einfach, indem du nur die notwendigen Befehle verwendest.
  • Makroaufzeichnung: Wenn du Makros aufzeichnest, kann der generierte Code unnötige Zeilen enthalten. Überarbeite den Code, um ihn effizienter zu gestalten.

Alternative Methoden

  • Direkte Formatierung: Statt VBA kannst du die Formatierungsoptionen im Excel-Menü verwenden, um die Farben von Datenreihen individuell anzupassen.
  • PowerPoint: Wenn du Diagramme in PowerPoint verwendest, kannst du die Farben einzelner Diagramme ebenfalls über die Formatierungsoptionen ändern.

Praktische Beispiele

  1. 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.

  2. 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.


Tipps für Profis

  • Vermeide .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.
  • Nutze RGB-Werte: Wenn du spezifische Farben benötigst, verwende RGB-Werte, um die Genauigkeit zu gewährleisten.
  • Hintergrunddiagramm in Excel ändern: Experimentiere mit verschiedenen Hintergründen, um den Fokus auf die Daten zu lenken.

FAQ: Häufige Fragen

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.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige