Ja, in Excel gibt es eine Möglichkeit, die Füllfarben von Zellen auf die Schriftfarben zu übertragen, ohne dass man die Hex-Codes manuell eingeben muss. Dies kann mit einem VBA-Makro erreicht werden. Hier ist ein einfaches Beispiel für ein solches Makro:
- Öffne deine Excel-Datei.
- Drücke
Alt + F11
, um den VBA-Editor zu öffnen.
- Klicke auf
Einfügen
und dann auf Modul
, um ein neues Modul zu erstellen.
- Kopiere und füge den folgenden VBA-Code in das Modul ein:
Sub CopyFillColorToFontColor()
Dim cell As Range
' Loop through each cell in the selection
For Each cell In Selection
' Copy the fill color to the font color
cell.Font.Color = cell.Interior.Color
Next cell
End Sub
- Schließe den VBA-Editor und kehre zu Excel zurück.
- Wähle die Zellen aus, deren Füllfarben du als Schriftfarben kopieren möchtest.
- Drücke
Alt + F8
, wähle CopyFillColorToFontColor
aus der Liste und klicke auf Ausführen
.
Dieser Code durchläuft jede ausgewählte Zelle und setzt die Schriftfarbe auf die gleiche Farbe wie die Füllfarbe der Zelle.
Hinweis: Stelle sicher, dass du die Originaldaten vorher sicherst, falls du versehentlich etwas falsch machst.
Falls du dies regelmäßig machen musst, kannst du den Code erweitern oder ein spezielles Ribbon-Button hinzufügen, um das Makro noch bequemer zu machen.