Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Zellen/Zeilen mit Umlauten farbig markieren, aber

Zellen/Zeilen mit Umlauten farbig markieren, aber
28.06.2005 15:14:56
Martin
Hallo,
in einer großen Tabelle will ich alle Zellen, die Umlaute (ß,Ä.Ö.Ü, ä,ü,ö= enthalten farbig markieren (rot) und dann auch die ganzen Zeile, in denen der Wert steht (grün).
Mit einem einfach Replace geht es hier nicht, weil die Daten noch dort wo sie herkommen, korrigiert werden müssen.-
Wie kann das mit VBA gehen?
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen/Zeilen mit Umlauten farbig markieren, aber
28.06.2005 15:42:55
Jan
Hi,
sind das reine Texte oder auch Formeln?
mfg Jan
AW: Zellen/Zeilen mit Umlauten farbig markieren, aber
28.06.2005 15:52:18
Martin
nur Text, keinerlei Formeln
Martin
AW: Zellen/Zeilen mit Umlauten farbig markieren, aber
28.06.2005 16:04:30
EffHa

Sub xx()
For i = 1 To letztezeile
For j = 1 To letztespalte
If InStr(1, Cells(i, j), "ö") > 0 Or _
InStr(1, Cells(i, j), "ä") > 0 Or _
InStr(1, Cells(i, j), "ö") > 0 Or _
InStr(1, Cells(i, j), "ü") > 0 Or _
InStr(1, Cells(i, j), "ß") > 0 Or _
InStr(1, Cells(i, j), "Ä") > 0 Or _
InStr(1, Cells(i, j), "Ö") > 0 Or _
InStr(1, Cells(i, j), "Ü") > 0 Then
Rows(j).Interior.ColorIndex = 4 'grün
Cells(i, j).Interior.ColorIndex = 3 'rot
End If
Next
Next
End Sub

Anzeige
AW: Zellen/Zeilen mit Umlauten farbig markieren, aber
28.06.2005 16:16:16
Martin
SUPER vielen Dank,
musste noch Next j, Next i ergänzen und Rows(i) ... nicht Rows(j) für die Farbe, läuft aber prima.
Das einzige, was mich da noch verrückt macht: Excel liest die Ä,Ü, Ö in der Text-Datei als etxrem, seltsame Sonderzeichen, nicht als "Ä" und "Ö", aber das liegt irgendwie am Import.
VIELEN Dank für die schnelle hilfe
Martin
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Zellen und Zeilen mit Umlauten in Excel farbig markieren


Schritt-für-Schritt-Anleitung

Um in Excel Zellen und Zeilen, die Umlaute (ä, ö, ü, ß, Ä, Ö, Ü) enthalten, farbig zu markieren, kannst du VBA (Visual Basic for Applications) verwenden. Folge diesen Schritten:

  1. Öffne Excel und lade die Tabelle, in der du die Farben anpassen möchtest.

  2. Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.

  4. Kopiere den folgenden VBA-Code in das Modul:

    Sub UmlauteFarbe()
       Dim letztezeile As Long
       Dim letztespalte As Long
       letztezeile = Cells(Rows.Count, 1).End(xlUp).Row
       letztespalte = Cells(1, Columns.Count).End(xlToLeft).Column
    
       For i = 1 To letztezeile
           For j = 1 To letztespalte
               If InStr(1, Cells(i, j).Value, "ö") > 0 Or _
                  InStr(1, Cells(i, j).Value, "ä") > 0 Or _
                  InStr(1, Cells(i, j).Value, "ü") > 0 Or _
                  InStr(1, Cells(i, j).Value, "ß") > 0 Or _
                  InStr(1, Cells(i, j).Value, "Ä") > 0 Or _
                  InStr(1, Cells(i, j).Value, "Ö") > 0 Or _
                  InStr(1, Cells(i, j).Value, "Ü") > 0 Then
    
                   Cells(i, j).Interior.ColorIndex = 3 ' rot
                   Rows(i).Interior.ColorIndex = 4 ' grün
               End If
           Next j
       Next i
    End Sub
  5. Schließe den VBA-Editor und gehe zurück zu Excel.

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

Jetzt sollten alle Zellen mit Umlauten rot und die zugehörigen Zeilen grün markiert sein.


Häufige Fehler und Lösungen

  • Fehler: Kein Farbwechsel
    Lösung: Stelle sicher, dass der VBA-Code korrekt eingefügt wurde und dass die Zeilen- und Spaltennummern in der Schleife richtig sind.

  • Fehler: Umlaute werden nicht erkannt
    Lösung: Überprüfe, ob die Daten aus einer Text-Datei importiert wurden. Manchmal können Umlaute als Sonderzeichen erscheinen. Versuche, die Datei mit der richtigen Codierung zu importieren.


Alternative Methoden

Wenn du keine VBA-Lösungen nutzen möchtest, kannst du auch die bedingte Formatierung verwenden:

  1. Markiere den gewünschten Zellbereich.
  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 Umlaute prüft, z.B.:
    =ODER(ISTFEHLER(FINDEN("ä";A1))=FALSCH;ISTFEHLER(FINDEN("ö";A1))=FALSCH;...)
  5. Wähle die gewünschten Formate (Hintergrundfarbe, Schriftfarbe) aus und klicke auf OK.

Praktische Beispiele

Angenommen, du hast eine Tabelle mit Namen in der Spalte A. Wenn du Umlaute in diesen Namen haben möchtest, wird der Code die Zellen wie folgt markieren:

Name
Müller
Schmidt
Jäger
Bäcker
Weber

Die Namen mit Umlauten werden rot markiert, und die Zeilen werden grün eingefärbt, um die Übersichtlichkeit zu erhöhen.


Tipps für Profis

  • Nutze Variablen für Farben: Anstatt Farben direkt im Code zu definieren, kannst du Variablen für die Farbcodes verwenden. So kannst du die Farben leichter ändern, ohne den gesamten Code zu modifizieren.

  • Erweitere den Code: Füge zusätzliche Bedingungen hinzu, um andere Sonderzeichen oder spezifische Textmuster zu erfassen.


FAQ: Häufige Fragen

1. Wie kann ich sicherstellen, dass der Code nur auf bestimmte Spalten angewendet wird?
Du kannst die Schleifen für die Spalten anpassen, indem du die Spaltennummern in der For-Schleife änderst.

2. Was kann ich tun, wenn Excel beim Importieren von Daten Umlaute falsch darstellt?
Überprüfe die Datei und stelle sicher, dass sie im richtigen Format (z.B. UTF-8) gespeichert ist, bevor du sie in Excel importierst.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige