Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1980to1984
1980to1984
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

verschiede Zellfarbe und Schriftfarben ändern je nach Wert

Forumthread: verschiede Zellfarbe und Schriftfarben ändern je nach Wert

verschiede Zellfarbe und Schriftfarben ändern je nach Wert
03.07.2024 11:29:58
JuergenD
Hallo Zusammen,
ich möchte die Zellfarben und die Schriftfarbe in Abhänigkeit eines Zellenwertes einer anderen Zelle ändern.
Also ist der Wert von
a1 = 1 dann soll Zellenfarbe h1 blau sein Schriftfarbe weiß
a1 = 2 dann soll Zellenfarbe h1 grün sein Schriftfarbe weiß
a1 = 3 dann soll Zellenfarbe h1 rot sein Schriftfarbe weiß
a1 = 4 dann soll Zellenfarbe h1 hellblau sein Schriftfarbe schwarz
a1 = 5 dann soll Zellenfarbe h1 gelb sein Schriftfarbe scharz

usw. maximal 9 Farbe in abhängikeit des Wertes der "Referenzzelle" z.B. a1

wie könnte ich das lösen?

Danke Gruß Jürgen
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: verschiede Zellfarbe und Schriftfarben ändern je nach Wert
03.07.2024 11:34:16
SF
Hola,
mit der bedingten Formatierung, indem du für jede Farbe eine eigene Regel erstellst.
Gruß,
steve1da
AW: verschiede Zellfarbe und Schriftfarben ändern je nach Wert
03.07.2024 16:56:57
Piet
Hallo

wenn sich der Wert in A1 ständig ändert kannst du es auch mit einem Target Makro lösen.
Hier mal ein Beispiel zum Spielen. Der Code gehört in das Sheet, wo die Änderung erfolgen soll.
Der 2. Code listet die alten 56 Grundfarben von Excel 2003 auf. Die neuen Farben mit dem Recorder aufzeichnen.

mfg Piet

Dim Rg As Range

Private Sub Worksheet_Change(ByVal Target As Range)
If InStr(Target.Address, ":") Then Exit Sub
If Target.Address > "$A$1" Then Exit Sub
If Target.Value = "" Then Exit Sub
Set Rg = Range("H1")
Select Case Target
Case 1: Rg.Interior.ColorIndex = 3
Rg.Font.ColorIndex = 1
Case 2: Rg.Interior.ColorIndex = 4
Rg.Font.ColorIndex = 5
Case 3: Rg.Interior.ColorIndex = 5
Rg.Font.ColorIndex = 2
End Select

'Schriftfarbe + Innenfarbe auflisten
Sub Schriftfarbe()
For j = 1 To 56
Cells(j, 1) = j
Cells(j, 3).Font.ColorIndex = j
Cells(j, 2).Interior.ColorIndex = j
Next j
End Sub
End Sub

Anzeige
AW: verschiede Zellfarbe und Schriftfarben ändern je nach Wert
03.07.2024 17:28:42
JuergenD
#Piet

die Idee mit dem Makro ist nicht schlecht.
Es ist jedoch ein Feld von 12 x 8 Zellen welche jede einzelne Zelle entsprechend eines Wertes aus einem anderen Tabellenblatt die Farben und Schriften geändert werden soll.
Da bin ich in Makro und VBA zu unsicher unterwegs das ich dies umsetzen kann.
Klar ist der Aufwand rein über Excel sicher höher aber von mir wahrscheinlich zu bewältigen

Wahrscheinlich für ein VBA Profi ein Klacks

Bei mir stehen in einem Tabellenblatt von F1 - F96 eben die Zahlenwerte und sollen dann in einem anderen Tabellenblatt die jeweils dazugehörige Zelle abändern.

Gruß Jürgen
Anzeige
AW: verschiede Zellfarbe und Schriftfarben ändern je nach Wert
03.07.2024 17:37:43
daniel
wie gesagt, das geht am einfachsten über die bedingte Formatierung.
lad mal ne beispieldatei hoch, dann kann man dir zeigen, wie du das konkret umsetzen musst
AW: verschiede Zellfarbe und Schriftfarben ändern je nach Wert
03.07.2024 12:43:28
JuergenD
also das mit der bedingeten Formatierung habe ich mal ausprobiert - aber funktioniert so nicht.
Nur Zellen formatieren die enthalten
Zellwert gleich =$a$1=1 soll dann zellenfarbe rot werden
so klappt es aber nicht
Anzeige
AW: verschiede Zellfarbe und Schriftfarben ändern je nach Wert
03.07.2024 12:47:52
SF
Du musst wechseln zu "Formel zur Erstellung......"
=$A1=1
=$A1=2
......

Forumthreads zu verwandten Themen

Inhalt einer Zelle im Windows Infobereich anzeigen
Thomas

Hallo,
kann ich den Inhalt einer Zelle im Windows Infobereich anzeigen lassen?
Ich habe eine VBA-Anwendung, die mir den Verarbeitungsstatus in einer Zelle anzeigt.
Weil die Verarbeitung sehr lange dauert möchte ich zwischendurch mit anderen Anwendungen arbeiten und unten rechts nebe...
27.08.2008 17:50:23
Thread-ID: 1005163
3 Beiträge
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
Wert bedingt in anderer Zelle darstellen
sascha76er

Hallo,
ich muss leider schon wieder das Forum mit meinen Fragen nerven.
Ich möchte gerne den Wert einer Zelle welcher in der Spalte W steht in einer Zelle in der Spalte D darstellen, aber nur wenn der entsprechende Wert mi WE beginnt.
Geht das?
Gruß
Sascha
08.10.2008 15:16:49
Thread-ID: 1015075
5 Beiträge
Kommenare beim Klick in die leere Zelle anzeigen?
Selma

Hallo Leute,
ich möchte in Zellen der Spalte E und Spalte F die Kommmentare als errechnete Werte beim Klick in die Zelle anzeigen, wenn diese Zelle leer sind. Sind die Zelle gefüllt, dann soll der Kommentar nicht angezeigt werden.
Die Voraussetzung ist, dass in Zelle der Spalte D die Za...
11.10.2008 12:17:00
Thread-ID: 1015730
8 Beiträge
Anzeige
Werte aus einer Zelle in andere Zelle (neue Datei)
Franz

Tach auch,
folgendes Problem habe ich:
ich öffne eine Datei über eine Vorlage "rep.xlt". Die heisst dann bis zum Speichern "rep1". In einer Zelle wird eine Zahl eingetragen, bspw.: 1234. Dann kann ich die Datei per makro speichern, dann heisst sie: "rep1234.xls. Das funktioniert auch g...
22.01.2009 15:10:00
Thread-ID: 1042648
3 Beiträge
Prozenten von Textbox in Zelle
Textbox

Hallo Spezialisten
Habe ein kleines Problemchen mit den Code.
Die Zelle ist in % formatiert. Wenn ich jetzt die Zahl 5 eingebe, kommt sie mit 500 daher in der Zelle.
Ist es auch möglich, daß bei Falscheingabe der Cursor in der Textbox bleibt?
Private Sub TextBox1_Exit(ByVal Ca...
31.01.2009 19:23:58
Thread-ID: 1045715
8 Beiträge
knifflig: in einer Zelle anzeigen, ob Makros aktiv
Tobias

Gibts ne Möglichkeit, in einer Zelle den "makrostatus" abzufragen.
Ohne VBA natürlich :)
So eine WAHR/FALSCH ausgabe wär praktisch,
da ich den Anfängern, die die Mappe öffnen, einen deutlichen Hinweis darauf geben möchte,
das sie Ohne aktiviertem VBA nicht funktioniert...
I...
20.02.2009 16:47:00
Thread-ID: 1052499
6 Beiträge
Hyperlink Ziel Zelle farbig anzeigen!
Wolfgang

Hallo,
benutze Hyperlinks um mich im Dokument zu bewegen.
Frage wenn ich nun zu Blatt 1 nach A32 springe, kann ich dann A32 farbig anzeigen lassen, und geht dann die Farbe wieder weg?
Vielen Recht herzlichen Dank für Eure Mühe.
Wolfgang
26.03.2009 08:30:54
Thread-ID: 1064093
5 Beiträge
Internetbild in Zelle anzeigen
stef@n

Hallo zusammen
bin auf der Suche nach einer Möglichkeit, ein Bild aus dem Internet in einer Zelle anzeigen zu lassen.
Ich habe es mit einem Hyperlink probiert z.b.
src="http: //www.google.de/intl/de_de/images/logo.gif" />
(Leerzeichen nach http: damit das Logo hier im Thre...
21.05.2009 15:50:09
Thread-ID: 1076569
9 Beiträge
Tabellenblattname in Zelle A1 anzeigen
Stefanglander

Hallo Forum,
ich habe hie reinen Code-Schnipsel den ich gerne umändern möchte aber mal wieder nicht weiß wie.
Im Moment wird der Tabellenname in der aktiven Zelle beim betätigen der Button angezeigt.
Wie muss ich den Code ändern, dass er in der Zelle B3 angezeigt wird ?
Sub TabN...
14.07.2009 13:33:41
Thread-ID: 1088475
3 Beiträge
Shapes("Linie 1") abhängig von Zelle darstellen
Zelle

Hallo Excelgemeinde,
ich bin am verzweifeln und brauche eure Hilfe.
Ich habe das Gefühl, dass ich nah an der Lösung meines Problems bin, aber es einfach nicht sehe.
Ich bastele an einer Leitertafel. Ich berechne 2 Werte.
In zwei spalten suche ich nun nach diesen Werten. Wenn de...
03.08.2009 02:25:38
Thread-ID: 1093101
2 Beiträge
Anzeige
Filterbedingungen in extra Zelle anzeigen
raphael

Dear all,
Ich habe eine Frage!
wie kann ich die Bedingung eines Autofilters in einer Extra Zelle darstellen?
Ich habe in B4:K4 einen Autofilter drin,
und ich möchte in B3:K3 die Bedingungen angezeigt bekommen.
Also ob das eine Custom/Top10/all oder halt einer meiner Auswahl...
18.09.2009 17:54:26
Thread-ID: 1103959
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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