Zellenformatierung Farben für Hintergrund und Schrift werden nicht übernommen

Leider hat dies meine Frage nicht beantwortet.
Ich möchte eine Zelle bedingt formatieren, dass habe ich auch gemacht.
Stand jetzt:
20 kurzlaute (F;S;N;T;BF;BS;BN;BT;S/F;N/F;…..)
Diese können durch Vorgabe mit je 32 Farben in Schrift, 32 Farben im Hintergrund, FETT, unterstrichen, Kursiv oder und auch durchgestrichen ausgewählt werden.
Jetzt möchte ich den Farbbereich aber endlich machen (für Schrift und Hintergrund je Zelle)
Über bedingter Formatierung, bin ich entweder eingeschränkt oder das System stirbt fast)
Wichtig ist auch, dass diese Funktion auch im gesperrten Modus funktionieren muss.

Vielleicht habe ich mich nicht gut ausgedrückt . Mir ist bewusst, dass das der Darkmode ist, aber bei der Nutzung, viele Monate vorher wurde das Dokument selbst in der Farbe weiß und der Hintergrund schwarz angezeigt. Nun wird alles schwarz angezeigt (auch das Dokument selbst). Wenn ich die Farbe auf auf schwarz umstelle, dann wird das Dokument zwar weiß, aber die Schrift ist nicht mehr zu lesen, also die Farben sind verkehrtherum
<br />Gruß
<br />Tazim
<br />

"Als Tabelle formatieren" ist ein schönes Feature und muss nur auf die vorhandenen Daten angewandt werden. Diese Tabelle erweitert sich automatisch bei neuen Eingaben.

Bringt in diesem Fall nichts, weil in den bedingten Formatierungen die Hintergründe immer auf keine Farbe gesetzt sind. Ansonsten bekäme ich aktuell mit den Farben der Schriften Probleme.
<br />Grüße
<br />

Hallo Annie,



wenn Du als Farben für den Hintergrund und die Schrift die hellen bzw. dunklen Designfarben verwendet hast, brauchst Du eigentlich nur unter Entwurf - Hintergrundformate von dunklem auf hellen Hintergrund umschalten, die Schriftfarbe passt sich dann automatisch
an. Da ich Deine verwendete Vorlage aber nicht kenne, käme es auf einen Versuch an, ob das klappt.



Viele Grüße

Ute

Hallo,

habe mal Functions geschrieben die sowas machen. Du musst nur noch die Farbe wissen, oder auslesen.



Mit den Functions für Hintergrund und Schrift kannst Du den aktuellen Wert auslesen. Den könntest Du natürlich auch zählen, oder Du verwendest hierfür die andern Functions, die musst Du dann aber jedesmal anpassen wenn Du andere Farben wählst, daher würde
ich eher Hintergrund und Schrift verwenden dann steht der Wert in einer separaten Spalte und Du kannst viel flexibler auswerten.



Function Anzahl_rot(Bereich)

x = 0

For Each Zelle In Bereich

If Zelle.Font.ColorIndex = 3 Then

x = x + 1

End If

Next

Anzahl_rot = x

End Function

Function summe_rot(Bereich)

x = 0

For Each Zelle In Bereich

If Zelle.Font.ColorIndex = 3 Then

x = x + Zelle.Value

End If

Next

summe_rot = x

End Function

Function Schrift(Zelle As Range)

Application.Volatile

Schrift = Zelle.Font.ColorIndex

End Function

Function Hintergrund(Zelle As Range)

Application.Volatile

Hintergrund = Zelle.Interior.ColorIndex

End Function