wenn Text in Zelle, dann farbig - VBA

Forumthread: wenn Text in Zelle, dann farbig - VBA

01.02.2020 08:31:57

Wolfgang

Hallo,
über ein UF werden jeweils Zeilen mit Daten "beschickt". Ich würde gerne erreichen, dass in Spalte F der Tabelle "Daten" die jeweilige Zelle, die dann Text enthält, farbig markiert wird (irgendeine helle, dezente Farbe). Habe schon recherchiert, komme aber irgendwie nicht weiter. Danke schon jetzt für die Rückmeldungen.
Viele Grüße - Wolfgang

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: wenn Text in Zelle, dann farbig - VBA

01.02.2020 08:40:43

Matthias
Vielen Dank, Matthias!!!!

02.02.2020 11:23:02

Wolfgang

AW: wenn Text in Zelle, dann farbig - VBA

01.02.2020 08:40:43

Matthias

Hallo
Warum nicht einfach bedingte Formatierung?
Oder habe ich was falsch verstanden?
Ansonsten mit VBA:

DEINEZELLE.Interior.color=vbcyan

Wobei DEINEZELLE die Zelladresse ist die Du ja sowieso kennst.
Gruß Matthias

Vielen Dank, Matthias!!!!

02.02.2020 11:23:02

Wolfgang

Hallo Matthias,
vielen lieben Dank für Deine Rückmeldung und die Hinweise. Ich hatte es auch schon über bedingte Formatierung versucht, konnte aber nicht so wirklich klären, wie ich vorgehe, wenn es um eine Nichtleere Zelle geht. Dann fiel mir ein, dass über VBA bzw. UF die Zelle sowieso im Einzelfall beschickt wird und wie Du es vorgeschlagen hast, über VBA farblich markiert wird. Das funktioniert auch so jetzt super. Nochmals vielen Dank und herzliche Grüße - Wolfgang

Infobox / Tutorial

Text in Zelle farbig markieren mit VBA und bedingter Formatierung

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Öffne Excel und die entsprechende Arbeitsmappe.
Gehe zu den Entwicklertools. Falls du die Entwicklertools nicht siehst, aktiviere sie in den Excel-Optionen.
Klicke auf "Visual Basic", um den VBA-Editor zu öffnen.
Füge ein neues Modul hinzu: Rechtsklick auf "VBAProject" > Einfügen > Modul.

Gib den folgenden VBA-Code ein, um die Zellen in Spalte F farbig zu markieren, wenn sie Text enthalten:

Sub FarbeBeiText()
   Dim Zelle As Range
   For Each Zelle In ThisWorkbook.Sheets("Daten").Range("F1:F100") 'Anpassung des Bereichs nach Bedarf
       If Not IsEmpty(Zelle.Value) Then
           Zelle.Interior.Color = vbCyan 'Wähle die gewünschte Farbe
       End If
   Next Zelle
End Sub

Schließe den VBA-Editor und gehe zurück zu Excel.
Führe das Makro aus: Entwicklertools > Makros > Wähle "FarbeBeiText" und klicke auf "Ausführen".

Häufige Fehler und Lösungen

Fehler: "Das Makro kann nicht gefunden werden."
- Lösung: Stelle sicher, dass das Makro im richtigen Modul gespeichert wurde und der Name korrekt eingegeben wurde.
Fehler: Zellen werden nicht farbig.
- Lösung: Überprüfe, ob die Zellen tatsächlich Text enthalten und dass der Bereich im Code korrekt definiert ist.
VBA funktioniert nicht in deiner Excel-Version.
- Lösung: Stelle sicher, dass du eine Excel-Version hast, die VBA unterstützt (z.B. Excel 2010 oder neuer).

Alternative Methoden

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

Markiere die Zellen in Spalte F.
Gehe zu "Start" > "Bedingte Formatierung" > "Neue Regel".
Wähle "Formel zur Ermittlung der zu formatierenden Zellen verwenden".
Gib die folgende Formel ein:
```
=ISTEXT(F1)
```
Wähle eine Formatierung (z.B. Hintergrundfarbe) und klicke auf "OK".

Praktische Beispiele

Angenommen, du möchtest in einer Tabelle alle Zellen in Spalte F farbig markieren, die den Text "Ja" enthalten:

VBA-Beispiel:

If Zelle.Value = "Ja" Then
   Zelle.Interior.Color = vbGreen
End If

Bedingte Formatierung Beispiel:
- Verwende die Formel:
```
=F1="Ja"
```

Tipps für Profis

Wenn du häufig mit Excel VBA bedingte Formatierung arbeitest, speichere deine Makros in einer persönlichen Makroarbeitsmappe, um sie in allen zukünftigen Projekten schnell nutzen zu können.
Experimentiere mit verschiedenen RGB-Farben, um die beste Farbwahl für deine Daten zu finden.
Nutze die Funktion WENN, um bestimmte Bedingungen in den Zellen zu überprüfen, bevor du die Formatierungen anwendest.

FAQ: Häufige Fragen

1. Wie kann ich die Farbe ändern, die verwendet wird? Du kannst die Farbe im VBA-Code anpassen, indem du Zelle.Interior.Color = RGB(255, 0, 0) für Rot oder andere RGB-Werte verwendest.

2. Ist es möglich, mehrere Bedingungen zu verwenden? Ja, du kannst mehrere If ... ElseIf-Bedingungen im VBA-Code verwenden oder mehrere Regeln in der bedingten Formatierung definieren.

3. Funktioniert das auch in Excel Online? VBA ist nicht in Excel Online verfügbar. Du kannst jedoch die bedingte Formatierung nutzen, um Zellen farbig zu markieren.

Beliebteste Forumthreads (12 Monate)

wenn Text in Zelle, dann farbig - VBA

Forumthread: wenn Text in Zelle, dann farbig - VBA

2 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Text in Zelle farbig markieren mit VBA und bedingter Formatierung

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread