Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 12:46:38
Nutzereingaben Speichern und Laden
26.04.2024 11:49:48
VAB und Bedingte Formatierung nimmt die Farbe im Makro nicht
26.04.2024 11:38:46
Acrobat PDF Formularfelder mit Excel ausfüllen
26.04.2024 11:23:04
zählen wenn - aber nur die selektierten Zeilen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1876to1880
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1876to1880
1876to1880
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Blasendiagramm Farben nach Zellinhalt

Blasendiagramm Farben nach Zellinhalt
24.03.2022 11:21:37
mb12
Hallo liebe Diagramm-Spezialisten,
da ich bisher einen groooßen Umweg um Diagramme gemacht habe, scheitere ich an der automatischen Anpassung der Farbe von Datenpunkten in Bubble-Diagrammen je nach Zellinhalt (als bedingte Formatierung angelegt)
"Prio 1" = grün
"Prio 2" = gelb
"Prio 3" = rot
Die Farben der restlichen Blasen bleiben unverändert. Am liebsten wäre mir eine VBA-Lösung, aber auch Formeln wären ein Weg.
Ich habe euch ein anonymisierte Datei beigefügt:
https://www.herber.de/bbs/user/152011.xlsm
Lieben Dank für eure Unterstützung,
Margarete

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
VBA-Lösung
24.03.2022 12:39:38
Beverly
Hi Margarete,
per Formel lassen sich Datenpunkte nicht so ohne Weiteres färben, das wäre - wenn überhaupt - nur mit sehr großem Aufwand und einer umfangreichen Hilfstabelle lösen. Mit VBA dagegen ist das nur ein kleiner Aufwand:

Sub BlasenFaerben()
Dim strX As String
Dim lngPunkt As Long
Dim serReihe As Series
Dim rngZellen As Range
With ActiveSheet.ChartObjects(1).Chart
Set serReihe = .SeriesCollection(1)
strX = Split(serReihe.Formula, ",")(1)
Set rngZellen = Range(strX).Offset(0, 5)
For lngPunkt = 1 To serReihe.Points.Count
If rngZellen.Cells(lngPunkt) Like "Prio*" Then
serReihe.Points(lngPunkt).Interior.Color = _
rngZellen.Cells(lngPunkt).DisplayFormat.Interior.Color
End If
Next lngPunkt
End With
End Sub
Bis später
Karin
Anzeige
AW: Blasendiagramm Farben nach Zellinhalt
24.03.2022 12:40:52
Nepumuk
Hallo Margarete,
teste mal:

Option Explicit
Public Sub SetChartColors()
Dim objPoint As Point
Dim avntTemp As Variant
Dim lngRow As Long
For Each objPoint In ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1).Points
avntTemp = Split(objPoint.DataLabel.Formula, "$")
lngRow = CLng(avntTemp(UBound(avntTemp)))
If Cells(lngRow, 16).Text Like "Prio #" Then
objPoint.Format.Fill.ForeColor.RGB = Cells(lngRow, 16).DisplayFormat.Interior.Color
End If
Next
End Sub
Gruß
Nepumuk
AW: Blasendiagramm Farben nach Zellinhalt
24.03.2022 13:01:10
mb12
Hallo liebe Karin + Max,
ich habe jetzt ein Luxusproblem: Innerhalb weniger Sekunden habe ich von euch je ein perfektes Makro erhalten.
So, und nachdem ich beide getestet habe, bleibt mir nur übrig zu würfeln, welches ich verwenden werde.
Kommentar meines Kollegen: "Da hätte ich Tage gebraucht, bis ich das zustande gebracht hätte" - dem kann ich nur zustimmen.
Habt ganz herzlichen Dank!!!!!
LG Margarete
Anzeige

39 Forumthreads zu ähnlichen Themen

Diagrammtitel aus Zelle übernehmen
Harald

Hallo,
ich habe in Tabellenblatt 1 in Zeile 1 ab Spalte B mehrere Jahre (2008 bis 2017) stehen. In Spalte A stehen ab Zeile 2 die Monate Januar bis Dezember. Die Spalten B2 bis K13 werden automatisch mit einem Wert gefüllt, sobald der jeweilige Monat beendet ist. In den Tabellenblättern 2 b...
03.10.2009 11:58:46
Thread-ID: 1106954
7 Beiträge
Anzeige
Balkendiagramm verschiedene Farben je nach Name
kathy

Hallo Leute,
ist es möglich, in einem Balkendiagramm je nach Raum unterschiedliche Farben automatisch zuzuordnen?
https://www.herber.de/bbs/user/69129.xlsx
Bin für jede Hilfe dankbar.
Gruß
kathy
17.04.2010 09:49:23
Thread-ID: 1152315
5 Beiträge
Untersch. Farbe in Diagramm je nach Wert
Tim

Hallo an alle,
ich habe eine Frage zu einem einfachen (Säulen-)Diagramm und hoffe, Ihr könnt mir weiterhelfen:
Gibt es hier eine Möglichkeit, dass die Säulen automatisch eine bestimmte Farbe erhalten, je nachdem, wie groß der zugrundeliegende Wert ist, ähnlich wie einer bedingten Form...
16.08.2012 21:04:41
Thread-ID: 1275347
11 Beiträge
Anzeige
Diagramm in Vorlage ändert die Farbe von Werten
Werten

Hallo,
ich habe folgendes Problem: Ich habe mit Excel 2010 eine Excel-Datei erstellt (vorlage.xlsm) in der einige Tabellenblätter sind, die aus Pivottabellen und Charts bestehen. Ich kopiere aus einer anderen Tabelle (die jeden Tag neu erzeugt wird, mit geänderten Werten!) meine "Rohdaten"...
24.02.2014 13:00:01
Thread-ID: 1350912
2 Beiträge
Anzahl Zellen färben nach Wert
Mr.Pink

Hallo zusammen,
ich bin auf der Suche nach einer Formel, die Zellen einfärbt. Sie soll dabei aus der vorhergehenden Zelle eine Zahl auslesen, Also zum Beispiel "6" und dann die nächsten 6 Zellen färben. Wenn 2 drin steht, dann 2 Zellen färben usw.
So wie hier dargestellt:
Hat jem...
22.03.2015 16:12:58
Thread-ID: 1416402
5 Beiträge
Balken im Diagramm nach Wert färben
Stefan

Hallo,
Ich möchte gerne unsere derzeit von Hand gepflegte Plantafel für die Produktion durch ein Excel Diagramm ersetzen, da dies eine große Zeitersparnis bedeuten würde.
Ich habe mir mal die Mühe gemacht und mir in Excel eine Arbeitsmappe erstellt, mit der ich die Daten per Button aus...
01.04.2015 15:50:33
Thread-ID: 1418529
5 Beiträge
Diagramm hor. Balken Farbe werteabhängig
Lukas

Hallo zusammen,
ich möchte die Daten einer langen Messreihe in einem Diagramm darstellen. Bei den Messwerten handelt es sich um Temperaturdaten. Dargestellt werden soll im Grund nur, ob der gemessene Wert über oder unter einem bestimmten Wert liegt.
Dazu wird an anderer Stelle für jede...
17.11.2015 17:12:37
Thread-ID: 1459046
7 Beiträge
Zellen unterschiedlich färben nach bestimmten Wert
Daniel

Hallo!
Ich wäre euch verbunden wenn ihr mir bei einem Problem weiterhelfen könntet.
Beschrieben habe ich es in der angehängten Excel Datei.
Es geht darum eine Zelle automatisch nach bestimmten Werten zu färben.
https://www.herber.de/bbs/user/102714.xlsx
Vielen Dank im Vorau...
11.01.2016 09:24:42
Thread-ID: 1468086
5 Beiträge
Anzeige

Links zu Excel-Dialogen

Label

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
8
4
10
2
1
4
4
6
4
6
2
5
6
6
1
1
1
5
1
7
2
4
2
2