Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: 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
Anzeige

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
Anzeige
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
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

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