Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1528to1532
1528to1532
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA-Datenpunkt mit Muster färben

Forumthread: VBA-Datenpunkt mit Muster färben

VBA-Datenpunkt mit Muster färben
13.12.2016 12:39:51
Monika
Hey,
ich versuche gerade ein Diagramm zu formatieren.
Die Farbe der Linen und Rahmen der Punkte funktioniert soweit, nur habe ich ein Muster über manche Datenpunkte gelegt (Diagonal gestreift) aber die Farbe des Musters lässt sich nicht ändern, es wird bei mir immer blau statt dem dunkelrot (RGB(125,0,0))
Mein Code hierfür:
ActiveChart.FullSeriesCollection(1).Points(1).Select
With Selection.Format.Fill
.ForeColor.RGB = RGB(125, 0, 0)
.BackColor.ObjectThemeColor = msoThemeColorBackground1
.Patterned msoPatternDarkUpwardDiagonal
End With
hat jmd eine Idee ?
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: RGB Farbe rot ist 255,0,0. owT.
13.12.2016 14:06:55
Dieter(Drummer)
AW: RGB Farbe rot ist 255,0,0. owT.
13.12.2016 16:16:34
Monika
das beantwortet leider nicht meine Frage
RGB(125,0,0) ist ein dunkelrot und RGB(255,0,0) ist hellrot
das ist mir theroetisch auch erst mal wirklich egal welche Farbe aber ich würde sie gerne bestimmen, es kommt aber leider immer automatisch blau obwohl die das Liniendiagramm sonst auch dunkelrot ist.
Anzeige
AW: VBA-Datenpunkt mit Muster färben
13.12.2016 16:31:23
Beverly
Hi Monika,
die Musterfarbe lässt sich offensichtlich (wie so manches bei Diagrammen) nicht per VBA regulieren. Man müsste eigentlich die Eigenschaft PatternColor (Musterfarbe) und nicht Fill (Füllung) ansprechen, aber diese Eigenschaft gibt es bei einem Datenpunkt nicht.

Anzeige
AW: VBA-Datenpunkt mit Muster färben
13.12.2016 16:52:49
Monika
Hey
habe es gerade mit Interior versucht, den Datenpunkt kann ich damit sogar ansprechen. Aber durch PatternColor kann ich nur die Hintergrundfarbe ändern gibt es hierzu evtl noch ein Befehl für die Musterfarbe?
ActiveChart.FullSeriesCollection(1).Points(1).Select
With Selection.Interior
.Pattern = xlPatternUp
.PatternColor = RGB(125,0,0) ' ändert nur Hintergrundfabre
End With
End Sub
Anzeige
AW: VBA-Datenpunkt mit Muster färben
13.12.2016 17:33:53
Beverly
Hi,
offensichtlich werden Zelle/Shape intern anders behandelt als ein Datenpunkt im Diagramm, sodass bei Zelle/Shape die Farbe des Musters geändert werden kann, beim Datenpunkt jedoch nicht.

;
Anzeige
Anzeige

Infobox / Tutorial

VBA-Datenpunkt mit Muster färben in Excel

Schritt-für-Schritt-Anleitung

  1. Öffne dein Excel-Dokument und gehe zu dem Diagramm, das du formatieren möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Füge den folgenden Code in ein neues Modul ein:

    Sub MusterFärben()
   ActiveChart.FullSeriesCollection(1).Points(1).Select
   With Selection.Format.Fill
       .ForeColor.RGB = RGB(125, 0, 0) ' Setze die Vordergrundfarbe
       .BackColor.ObjectThemeColor = msoThemeColorBackground1 ' Setze die Hintergrundfarbe
       .Patterned msoPatternDarkUpwardDiagonal ' Setze das Muster
   End With
End Sub

  4. Schließe den VBA-Editor und führe das Makro aus, um das Muster des Datenpunkts zu ändern.

Beachte, dass die Farbe des Musters oft nicht wie gewünscht geändert werden kann, da die PatternColor-Eigenschaft bei Datenpunkten nicht verfügbar ist.

Häufige Fehler und Lösungen

  • Fehler: Das Muster bleibt blau, obwohl du eine andere Farbe einstellen möchtest.

    • Lösung: Versuche, die PatternColor-Eigenschaft zu verwenden, allerdings funktioniert diese nur für Formen oder Zellen, nicht für Datenpunkte im Diagramm.

  • Fehler: Keine Änderung der Hintergrundfarbe beim Datenpunkt.

    • Lösung: Stelle sicher, dass du die Interior-Eigenschaft ansprechen kannst, um die Hintergrundfarbe zu ändern:
    With Selection.Interior
  .Pattern = xlPatternUp
  .PatternColor = RGB(125, 0, 0)  ' Ändert nur die Hintergrundfarbe
End With

Alternative Methoden

Wenn du Schwierigkeiten mit VBA hast, kannst du auch die Formatierungsoptionen in Excel selbst verwenden:

  1. Klicke mit der rechten Maustaste auf den Datenpunkt.
  2. Wähle „Datenpunkt formatieren“ aus dem Kontextmenü.
  3. Suche im Menü nach den Optionen für die Füllung und das Muster. Hier kannst du eventuell den gewünschten Effekt erzielen.

Praktische Beispiele

  1. Datenpunkt im Liniendiagramm färben:

    Sub LinienDatenpunktFärben()
   ActiveChart.FullSeriesCollection(1).Points(2).Select
   With Selection.Format.Fill
       .ForeColor.RGB = RGB(0, 255, 0) ' Setze grün als Vordergrundfarbe
       .Patterned msoPatternDarkUpwardDiagonal
   End With
End Sub

  2. Gestreifte Zellen einfärben:

    Um Zellen mit einem gestreiften Muster zu formatieren, kannst du die Interior-Eigenschaft verwenden:

    Sub ZellenGestreiftFärben()
   Range("A1:A10").Interior.Pattern = xlPatternStripe
   Range("A1:A10").Interior.PatternColor = RGB(255, 0, 0) ' Rote Streifen
End Sub

Tipps für Profis

  • Experimentiere mit verschiedenen Mustern, um den gewünschten visuellen Effekt zu erzielen.
  • Verwende die Debug.Print-Funktion in deinem VBA-Code, um Werte zu überprüfen und sicherzustellen, dass du die richtigen Objekte ansprichst.
  • Achte darauf, dass Excel-Versionen unterschiedliche Möglichkeiten zur Anpassung von Diagrammen bieten. Stelle sicher, dass du eine aktuelle Version verwendest, die alle benötigten Funktionen unterstützt.

FAQ: Häufige Fragen

1. Kann ich die Musterfarbe eines Datenpunkts ändern? Leider ist die PatternColor-Eigenschaft bei Datenpunkten im Diagramm nicht verfügbar. Du kannst nur die Füllfarbe und das Muster ändern.

2. Warum wird mein Muster nicht in der gewünschten Farbe angezeigt? Die Musterfarbe wird oft standardmäßig auf Blau gesetzt. Experimentiere mit den Füll- und Hintergrundfarbeinstellungen, um den gewünschten Effekt zu erzielen.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige