Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Schriftfarbe an Hintergrundfarbe angleichen!

Forumthread: Schriftfarbe an Hintergrundfarbe angleichen!

Schriftfarbe an Hintergrundfarbe angleichen!
05.09.2002 15:41:19
markus
hallo!
habe es über eure hilfe geschafft, zum berechnungen über farbe zu rechnen. nun muss ich aber die schriftfarbe an die hintergrundfarbe in einem bestimmten bereich automatisch anpassen! also wenn hintergrund = rot, soll die schriftfarbe auch rot werden. was gibt es da für lösungen? vba?
gruss markus
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Schriftfarbe an Hintergrundfarbe angleichen!
05.09.2002 15:51:44
L.Vira
Option Explicit
Sub Farbe()
Dim c As Range
For Each c In Selection
On Error Resume Next
c.Font.ColorIndex = c.Interior.ColorIndex
Next
End Sub
Re: Schriftfarbe an Hintergrundfarbe angleichen!
05.09.2002 15:59:02
markus
funzt nicht!
ich habe zellen von E3 bis E5 hinüber bis zu AK 3 bis AK5 > diese haben z.b. gelben hintergrund.
in zelle 7 bis AK 7 und E8 bis AK 8 sind werte die demensprechend dem hintergrund von oben eingefärbt werden müssen.
Anzeige
Re: Schriftfarbe an Hintergrundfarbe angleichen!
05.09.2002 16:10:50
L.Vira
du musst nur die entsprechen Zellen statt:
For Each c In Selection
so:
For each c in Range("E3:E5,AK3:AK5") usw.
angeben.
Re: Schriftfarbe an Hintergrundfarbe angleichen!
05.09.2002 17:10:21
markus
leider, es geht nicht...-)))
folgendes:
E2:E4 ist gelb eingefärbt (hintergrund). von E7:E8 sind zahlen in schwarz. diese schwarzen möchte ich auf gelb automatisch umfärben, immer wenn sich die hintergrundfarbe ändert, muss sich auch die schriftfarbe ändern.
Anzeige
Re: Schriftfarbe an Hintergrundfarbe angleichen!
05.09.2002 18:59:55
L.Vira
Ja, verstehe, aber das muss von einem geeigneten Ereignis gesteuert werden, das Ändern der Farbe löst aber kein Ereignis aus.
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige

Infobox / Tutorial

Schriftfarbe automatisch an Hintergrundfarbe anpassen in Excel


Schritt-für-Schritt-Anleitung

Um die Schriftfarbe in Excel automatisch an die Hintergrundfarbe anzupassen, kannst Du VBA (Visual Basic for Applications) verwenden. Befolge diese Schritte:

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Klicke im Menü auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Füge den folgenden Code in das Modul ein:

    Option Explicit
    Sub Farbe()
       Dim c As Range
       For Each c In Range("E3:E5, AK3:AK5") ' Hier den gewünschten Bereich anpassen
           On Error Resume Next
           c.Font.ColorIndex = c.Interior.ColorIndex
       Next
    End Sub
  4. Schließe den VBA-Editor und kehre zu Deiner Excel-Tabelle zurück.

  5. Wähle die Zellen aus, für die Du die Schriftfarbe ändern möchtest.

  6. Drücke ALT + F8, wähle Farbe und klicke auf Ausführen.

Jetzt wird die Schriftfarbe automatisch geändert, wenn Du die Hintergrundfarbe der Zellen anpasst.


Häufige Fehler und Lösungen

  • Fehler: „Funzt nicht!“

    • Lösung: Stelle sicher, dass der angegebene Zellbereich korrekt ist. Anstatt Selection zu verwenden, solltest Du explizit den Bereich wie im Beispiel angeben.
  • Fehler: „Die Schriftfarbe ändert sich nicht automatisch.“

    • Lösung: VBA wird nicht automatisch ausgeführt, wenn sich die Hintergrundfarbe ändert. Du musst das Makro manuell ausführen oder eine Ereignisprozedur verwenden.

Alternative Methoden

Wenn Du keine VBA-Lösungen verwenden möchtest, kannst Du auch bedingte Formatierung in Excel nutzen. Hier ist, wie Du das machen kannst:

  1. Wähle die Zellen aus, die Du formatieren möchtest.
  2. Gehe zu Start > Bedingte Formatierung > Neue Regel.
  3. Wähle „Formel zur Ermittlung der zu formatierenden Zellen verwenden“.
  4. Gib eine Formel ein, die die Hintergrundfarbe überprüft, und wähle die Schriftfarbe entsprechend aus.

Beachte, dass diese Methode weniger flexibel ist als VBA.


Praktische Beispiele

Angenommen, Du hast Zellen mit verschiedenen Hintergrundfarben, und Du möchtest die Schriftfarbe automatisch anpassen:

  • Beispiel 1: Zellen E2:E4 sind gelb. Wenn Du jetzt die Werte in E7:E8, die schwarz sind, auf gelb ändern möchtest, führe das oben genannte Makro aus.

  • Beispiel 2: Wenn die Hintergrundfarbe rot ist, kannst Du die Schriftfarbe ebenfalls auf rot setzen, indem Du den VBA-Code entsprechend anpasst.


Tipps für Profis

  • Verwende Ereignisprozeduren wie Worksheet_Change, um die Schriftfarbe automatisch zu ändern, wenn sich die Hintergrundfarbe einer Zelle ändert.

  • Experimentiere mit verschiedenen ColorIndex-Werten, um die gewünschte Schriftfarbe zu erreichen.

  • Berücksichtige, welche Schriftfarbe auf welchem Hintergrund gut lesbar ist. Zum Beispiel ist weiße Schrift auf blauem Hintergrund oft gut sichtbar.


FAQ: Häufige Fragen

1. Wie kann ich die Schriftfarbe in Excel automatisch ändern, wenn ich die Hintergrundfarbe ändere? Um die Schriftfarbe in Excel automatisch zu ändern, musst Du ein VBA-Makro verwenden, das die Schriftfarbe an die Hintergrundfarbe anpasst.

2. Funktioniert dies in allen Excel-Versionen? Ja, die oben beschriebenen Methoden funktionieren in den meisten modernen Excel-Versionen, die VBA unterstützen, wie Excel 2010, 2013, 2016, 2019 und Excel 365.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige