Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1872to1876
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
1872to1876
1872to1876
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Farbe bei gleichem Zellinhalt übernehmen

Farbe bei gleichem Zellinhalt übernehmen
24.02.2022 10:31:54
mb12
Hallo liebe Helfer*innen,
wieder mal das unendliche Thema Hintergrundfarbe übernehmen (am liebsten Formel oder VBA, bedingte Formatierung nur wenn erforderlich)
In Spalte S steht eine Liste von Schlüsselnummern mit jeweils einer zugewiesenen Hintergrundfarbe.
Im Bereich A4:Q habe ich eine formatierte Tabelle.In Spalte Q stehen einzelne dieser Nummern, die über eine Formel ermittelt wurden. Diese Nummern sollten jetzt die gleiche Hintergrundfarbe aus Spalte S erhalten. Ich bekomm es einfach nicht gebacken, und finde diesen Fall auch nicht in der Recherche.
Hier die Beispieldatei:
https://www.herber.de/bbs/user/151340.xlsx
Vorab schon vielen Dank für eure Unterstützung
Margarete

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Farbe bei gleichem Zellinhalt übernehmen
24.02.2022 10:41:52
Daniel
Hi
dieses Makro drüberlaufen lassen.
das musst du jedesmal machen, wenn sich die Werte ändern.

Sub Färben()
Dim ZelleWert As Range
Dim ZelleFarbe As Range
For Each ZelleWert In Range("Tabelle1[Farbe]")
If ZelleWert.Value  "" Then
Set ZelleFarbe = Range("S:S").Find(what:=ZelleWert.Value, lookat:=xlWhole, LookIn:=xlValues)
If ZelleFarbe Is Nothing Then
ZelleWert.Interior.ColorIndex = xlNone
Else
ZelleWert.Interior.Color = ZelleFarbe.Interior.Color
End If
End If
Next
End Sub
Gruß Daniel
AW: Farbe bei gleichem Zellinhalt übernehmen
24.02.2022 10:50:04
mb12
Hallo Daniel,
ganz lieben Dank; ist schon eingefügt und funktioniert (natürlich!)
LG, Margarete
Anzeige

197 Forumthreads zu ähnlichen Themen

Bedingte Formatierung - Datenbalken bei neg Werten
Gianleandro

Ich suche nach einer Möglichkeit die Datenbalken bei der bedingten Formatierung auch für negative Werte zu nutzen. Dabei schwebt mir eine Art Spielgelung der Datenbalken bei negativen Werten vor.
Wer hat dazu eine Idee?
https://www.herber.de/bbs/user/55283.xlsx
09.09.2008 14:22:24
Thread-ID: 1008498
3 Beiträge
Anzeige
Doppelte Einträge in einer Spalte farbig markieren
Robert

Hallo,
ich hab eine Tabelle mit riesigem Datenbestand. Mein Problem ist nun, dass doppelte Eintrage, die in einer Spalte vorkommen, farbig markiert werden sollten - und das gleiche bei jeder weiteren Spalte mit Inhalt.
Sollten in einer Spalte doppelte Einträge vorhanden sein, müsste die...
27.10.2008 19:09:00
Thread-ID: 1019713
11 Beiträge
Zellen mit gleichem Inhalt farblich markieren
TomTom

Hi,
ich möchte meine Spalte "F5:F500" auf dem Sheet "Ausgabe" nach doppelten oder mehrfach vorkommenden Zellen (gleicher Inhalt) farblich rot markieren (Schriftfarbe Rot)
Wie macht man denn das ?
Danke
Tom
10.12.2008 09:02:54
Thread-ID: 1031574
5 Beiträge
Anzeige
Gleiche Zellen markieren
Excel-F

Moin Gemeinde,
nachdem ich noch längerem Suchen im Netz keine Lösung für mein Problem gefunden habe, wende ich mich jetzt hilfesuchend an euch.
Folgendes Problem:
Ich habe einen fest definierten Bereich.
Hier sind Buchstaben eingetragen, Bsp. u ,k , s, f
Nun möchte ich alle...
17.03.2009 12:15:27
Thread-ID: 1061059
4 Beiträge
alle befüllten Zeilen einer Mappe zählen
Steffen

Hallo Ex(cel)perten,
wie muss ich meinen Code ergänzen, um alle befüllten Zeilen einer kompletten Arbeitsmappe ausgezählt zu bekommen?
für ein einzelnes Blatt kriege ich es hin, da keine leeren Zeilen zwischendrin vorhanden sind
all = Cells(Rows.Count, 1).End(xlUp).Row
Gruß
...
06.05.2009 10:51:40
Thread-ID: 1073279
5 Beiträge
Zeile markieren, wenn sich der Wert wechselt
Peter

Hallo Forum, ich habe mir mit Hilfe von Eueren Beiträgen ein Makro gebastelt. Jetzt sollte noch jeweils die letzte Zeile markiert werden, wenn sich der Wert ändert (s. Beispiel). Baue auf Euere Hilfe, habe in der Recherche nichts Passendes gefunden. Danke im voraus. Gruß Peter
Die Datei htt...
23.06.2009 17:03:12
Thread-ID: 1083879
8 Beiträge
Bedingte Formatierung mit mehreren Werten
Thorsten

Liebe Excel-Gurus,
ich benötige Hilfe bei folgendem Problem.
In der angehängten Tabelle möchte ich gerne, dass die Zeile bzw. das LAS und FAL
sich farblich verändern sobald in irgendeinem der oberen Fraktionen der Wert
Farbe (grün), Farbe (weiß) oder Farbe (braun) ausgewählt wir...
13.07.2009 17:09:04
Thread-ID: 1088289
2 Beiträge
Doppelte Werte + unterschiedliche Schreibweisen
Marcel

Hallo,
gibt es eine Möglichkeit, neben den bekannten Funktionen wie
- Bedingte Formatierung (ZÄHLENWENN($A$1;$A$18;A1)Größer1)
- WENN(VERGLEICH(A4;A:A;0)=ZEILE();"";"Doppelt")
sich doppelte Einträge eder Zellen einer Spalte Anzeigen zu lassen (10.000 Datensätze), wenn unterschie...
22.07.2009 13:47:42
Thread-ID: 1090530
7 Beiträge
Anzeige

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
2
6
10
4
6
3
4
7
1
6
6
3
2
6
7
8
15
3
1
1
3
5
3
5
2