Excel: Wenn die Schriftfarbe rot ist, dann gebe einen bestimmten Text zurück oder führe andere Operationen aus.
Wie könnten Sie einen bestimmten Text zurückgeben, wenn die Schriftfarbe in einer anderen Zelle rot ist, wie im folgenden Screenshot gezeigt? In diesem Artikel werde ich einige Tricks vorstellen, um auf Basis des roten Schrifttextes in Excel verschiedene Aktionen durchzuführen.
Wenn die Schriftfarbe rot ist, dann gebe einen bestimmten Text in einer anderen Zelle zurück.
Um einen bestimmten Text zurückzugeben, wenn die Schriftfarbe in einer anderen Zelle rot ist, gehen Sie bitte wie folgt vor:
1. Drücken Sie gleichzeitig die Tasten Alt + F11, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.
2. Klicken Sie dann auf Einfügen > Modul, kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Fenster ein.
VBA-Code: Wenn die Schriftfarbe rot ist, dann gebe einen bestimmten Text zurück.
Function FontColorisRed(Rng As Range)
'Updateby ExtendOffice
Application.Volatile
If Rng.Font.ColorIndex = 3 Then
FontColorisRed = "Fail"
Else
FontColorisRed = "Pass"
End If
End Function
3. Schließen Sie dann das Codefenster und geben Sie diese Formel ein: =FontColorISRed(B2), und ziehen Sie den Ausfüllkursor nach unten, um weitere Ergebnisse zu erhalten, siehe Screenshot:
Entfesseln Sie die Magie von Excel mit Kutools AI
- Intelligente Ausführung: Führen Sie Zellenoperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles angetrieben durch einfache Befehle.
- Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe zu optimieren.
- VBA-Codierung: Schreiben und implementieren Sie VBA-Code mühelos.
- Formelinterpretation: Verstehen Sie komplexe Formeln mit Leichtigkeit.
- Textübersetzung: Überwinden Sie Sprachbarrieren in Ihren Tabellen.
Wenn die Schriftfarbe rot ist, dann markiere die Zelle.
Wenn Sie die Zellen basierend auf der roten Schrift hervorheben möchten, gehen Sie bitte wie folgt vor:
1. Drücken Sie gleichzeitig die Tasten Alt + F11, um das Microsoft Visual Basic for Applications-Fenster zu öffnen.
2. Klicken Sie dann auf Einfügen > Modul, kopieren Sie den folgenden VBA-Code und fügen Sie ihn in das Fenster ein.
VBA-Code: Wenn die Schriftfarbe rot ist, dann markiere die Zelle.
Function HighlightRedFont(pRg As Range) As Boolean
'Updateby ExtendOffice
Dim xRg As Range
Dim xBol As Boolean
xBol = False
For Each xRg In pRg
If xRg.Font.Color = vbRed Then
xBol = True
End If
Next
HighlightRedFont = xBol
End Function
3. Schließen Sie dann das Codefenster, gehen Sie auf Start > Bedingte Formatierung > Neue Regel, siehe Screenshot:
4. Im erscheinenden Dialogfeld „Neue Formatierungsregel“ führen Sie die folgenden Aktionen aus:
- Klicken Sie auf „Formel verwenden, um zu bestimmen, welche Zellen formatiert werden sollen“ in der Liste „Regeltyp auswählen“;
- Geben Sie diese Formel =highlightredfont(B2) in das Feld „ Werte formatieren, für die diese Formel wahr ist“ ein;
- Klicken Sie dann auf die Schaltfläche Formatieren.
5. Im Dialogfeld „Zellen formatieren“ wählen Sie unter dem Register „Füllung“ eine Farbe aus, mit der Sie die Zelle hervorheben möchten, siehe Screenshot:
6. Klicken Sie anschließend auf OK > OK, um die Dialogfelder zu schließen. Nun werden die Zellen mit roter Schrift sofort hervorgehoben, siehe Screenshot:
Wenn die Schriftfarbe rot ist, dann ändere die Schriftfarbe.
Manchmal möchten Sie vielleicht die rote Schrift in eine andere Schriftfarbe ändern. Hier werde ich über zwei Methoden sprechen, um dies zu erreichen.
Wenn die Schriftfarbe rot ist, dann ändere die Schriftfarbe mit der Funktion „Suchen und Ersetzen“.
Um die rote Schriftfarbe in eine andere Farbe zu ändern, kann Ihnen die Funktion „Suchen und Ersetzen“ in Excel helfen. Gehen Sie bitte wie folgt vor:
1. Wählen Sie den Datenbereich aus, dessen Schriftfarbe Sie ändern möchten, und drücken Sie dann die Tasten Strg + H, um das Dialogfeld „Suchen und Ersetzen“ zu öffnen. Klicken Sie im geöffneten Dialogfeld auf die Schaltfläche Optionen>>, siehe Screenshot:
2. Führen Sie im erweiterten Dialogfeld die folgenden Aktionen aus:
- Lassen Sie die Felder „Suchen nach“ und „Ersetzen durch“ leer;
- Auf der rechten Seite des „Suchen nach“ Feldes wählen Sie Format > Format von Zelle auswählen und klicken Sie auf eine Zelle mit roter Schrift;
- Dann wählen Sie auf der rechten Seite des Feldes „Ersetzen durch“ Format > Format, um zum Dialogfeld „Ersetzungsformat“ zu gelangen.
3. Im Dialogfeld „Ersetzungsformat“ wählen Sie unter dem Register „Schriftart“ eine Farbe aus der Dropdown-Liste „Farbe“, die Sie ändern möchten, siehe Screenshots:
4. Klicken Sie dann auf OK, um das Dialogfeld „Ersetzungsformat“ zu schließen, und klicken Sie jetzt im Dialogfeld „Suchen und Ersetzen“ auf die Schaltfläche „Alle ersetzen“. Alle Zellen mit roter Schrift werden durch die von Ihnen angegebene Schriftfarbe ersetzt, siehe Screenshot:
Wenn die Schriftfarbe rot ist, dann ändere die Schriftfarbe mit einer nützlichen Funktion.
Wenn Sie Kutools für Excel haben, können Sie mit der Funktion „Zellen mit Format auswählen“ die Zellen mit roter Schrift auswählen und dann die Schriftfarbe so schnell wie möglich nach Bedarf ändern.
Nach der Installation von Kutools für Excel gehen Sie bitte wie folgt vor:
1. Wählen Sie den Datenbereich aus, den Sie verwenden möchten, und klicken Sie dann auf Kutools > Auswählen > Zellen mit Format auswählen, siehe Screenshot:
2. Klicken Sie im Dialogfeld „Zellen mit Format auswählen“ auf die Schaltfläche „Format von Zelle auswählen“. Wählen Sie dann eine Zelle mit roter Schrift aus, alle Attribute dieser Zelle werden in der darunter liegenden Listenbox angezeigt. Wenn Sie alle Zellen mit genau demselben Format der Basiszelle auswählen möchten, aktivieren Sie bitte alle Attributoptionen; Wenn Sie nur die Zellen mit roter Schrift auswählen möchten, deaktivieren Sie alle anderen Attribute außer dem Kontrollkästchen „Schriftfarbe“. Siehe Screenshot:
3. Klicken Sie dann auf die Schaltfläche OK, und klicken Sie im darauf folgenden Bestätigungsdialogfeld auf Ja, siehe Screenshot:
4. Alle Zellen mit roter Schrift werden sofort ausgewählt, und dann können Sie eine Schriftfarbe angeben, um die rote Schrift nach Bedarf zu ändern. Siehe Screenshot:
Die besten Tools zur Büroproduktivität
Kutools für Excel löst die meisten Ihrer Probleme und steigert Ihre Produktivität um 80 %
- Super Formel-Leiste (F) (mehrere Zeilen Text und Formeln einfach bearbeiten); Lese-Layout (einfaches Lesen und Bearbeiten einer großen Anzahl von Zellen); Einfügen in gefilterte Bereiche...
- Zellen/Zeilen/Spalten zusammenführen und Daten behalten; Zellinhalt aufteilen; Doppelte Zeilen zusammenführen und Summe/Durchschnitt berechnen... Doppelte Zellen verhindern; Bereiche vergleichen...
- Doppelte oder eindeutige Zeilen auswählen; Leere Zeilen auswählen (alle Zellen sind leer); Super Suchen und unscharfes Suchen in vielen Arbeitsmappen; Zufällige Auswahl...
- Exakte Kopie mehrerer Zellen ohne Änderung der Formelreferenz; Automatisches Erstellen von Referenzen zu mehreren Blättern; Aufzählungszeichen, Kontrollkästchen und mehr einfügen...
- Formeln, Bereiche, Diagramme und Bilder favorisieren und schnell einfügen; Zellen mit Passwort verschlüsseln; Mailingliste erstellen und E-Mails senden...
- Text extrahieren, Text hinzufügen, Zeichen an einer bestimmten Position entfernen, Leerzeichen entfernen; Druckstatistik erstellen und drucken; Zwischen Zelleninhalt und Kommentaren konvertieren...
- Super Filter (Filter-Schemata speichern und auf andere Blätter anwenden); Erweiterte Sortierung nach Monat/Woche/Tag, Häufigkeit und mehr; Spezialfilter nach Fett, Kursiv...
- Arbeitsmappen und Arbeitsblätter konsolidieren; Tabellen basierend auf Schlüsselspalten zusammenführen; Daten auf mehrere Blätter aufteilen; Stapelkonvertierung von xls, xlsx und PDF...
- Gruppierung von PivotTables nach Kalenderwoche, Wochentag und mehr... Entsperre und gesperrte Zellen durch unterschiedliche Farben anzeigen; Zellen mit Formel/Name hervorheben...
- Aktivieren Sie die Registerkarten-Bearbeitung und den Lese-Modus in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs desselben Fensters, anstatt in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert Hunderte von Mausklicks täglich!
