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

Forumthread: Bedingte Formatierung erkennen

Bedingte Formatierung erkennen
08.10.2007 16:44:25
Tom
Hallo,
ich habe eine Tabelle mit über 1500 Zeilen. Ursprünglich wurden einige mit der bedingten Formatierung
hinterlegt, der die jeweilge Zelle "durchstreicht" wenn in Zelle K das Wort "bez" auftaucht.
Per Handarbeit alles abzuändern ist sehr mühsam ... Gibt es eine Möglichkeit, diese Zellen farbig zu markieren (über VBA), die die Formatierung "durchgestrichen" enthalten?
Bin in VBA nicht der Größte ...
Danke vorab
TOM

Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
warum VBA
08.10.2007 16:47:20
Mac4
Hallo TOM,
alle Zellen markieren - F5 - Inhalte - bedingte Formate
Marc

AW: warum VBA
08.10.2007 17:32:16
Tom
Hi Marc,
wie kann ich dann erkennen, welche definitiv durchgestrichen werden ?
Sorry, aber irgendwie stehe ich voll daneben ...

AW: warum VBA
08.10.2007 18:25:00
Heinz
Hi,
das geht nur mit VBA.
Du musst die Formel der Bedingten Formatierung im Code abfragen ob die Bedingung
erfüllt ist. Nicht so ganz einfach.
mfg Heinz

Anzeige
AW: warum VBA
08.10.2007 19:35:00
Tom
Hallo Heinz,
das dachte ich mir ... Und da mein VBA nicht wirklich gut ist ....
Vielleicht hat ja jemand einen Lösungsvorschlag - würde mir ungemien weiterhelfen!
Danke vorab
Formel ist =WENN($K99="bez";WAHR)
Betreffende Zellen A2:J1550
Gruß
TOM

AW: warum VBA
08.10.2007 19:50:00
Heinz
Hi,
ohne Beispieldatei wird das wohl nichts.
mfg Heinz

Anzeige
AW: warum VBA
09.10.2007 00:46:39
Daniel
Hi
ohne VBA vielleicht so:
1. neues, leeres Tabellenblatt nehmen und über den gesamten verwendeten Zellbereich in jede Zelle "bez" eintragen.
2. in deinem Arbeitsblatt alle Zellen markieren und mit dem Pinsel die Zellformate in das neue Blatt übertragen
3. dann siehst du, in welchen Zellen deine gesuchte bedingte Formatierung geschaltet ist und in welchen nicht und kannst sie entsprechend in deinem Original-Arbeitsblatt bearbeiten.
wie gesagt, diese Methode funtkioniert nur by Hand.
Gruß, Daniel

Anzeige
AW: warum VBA
09.10.2007 01:13:09
Daniel
Hi
mit VBA den Formeltext der bedingten Formatierung zu testen ist nicht ganz triviial, weil ich noch nicht rausgefunden habe, wie man den Formeltext in der Z1S1-Schreibweise herausbekommt, denn nur diese ließe sich relativ einfach prüfen. Die A1-Schreibweise ändert sich ja mit jeder Zelle.
einfacher ist es, sich alle Zellen markieren zu lassen, die als Bedingte Formatierung den durchgestrichenen Text haben.
Das kann man mit diesem Code machen:

Sub test1()
Dim Zelle As Range
For Each Zelle In Range("A2:J1550")
If Zelle.FormatConditions(1).Font.Strikethrough = True Then Zelle.Interior.ColorIndex = 3
Next
End Sub


Gruß, Daniel

Anzeige
AW: warum VBA
09.10.2007 10:09:11
Tom
Hallo Daniel,
genau mit diesem Code errecihe ich das gewünschte Ergebnis - Super, vielen Dank!
Danke auch an alle anderen!
Gruß
TOM
;

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

Bedingte Formatierung erkennen und anwenden


Schritt-für-Schritt-Anleitung

  1. Zelle auswählen: Öffne deine Excel-Datei und wähle den Zellbereich aus, in dem du die bedingte Formatierung überprüfen möchtest (z.B. A2:J1550).

  2. Inhalte auswählen:

    • Drücke die Taste F5 oder gehe zu „Start“ > „Suchen und Auswählen“ > „Gehe zu“.
    • Wähle „Inhalte“ und dann „Bedingte Formate“ aus.
  3. VBA Code verwenden: Um die Zellen mit der bedingten Formatierung zu markieren, kannst du folgenden VBA Code verwenden:

    Sub test1()
       Dim Zelle As Range
       For Each Zelle In Range("A2:J1550")
           If Zelle.FormatConditions(1).Font.Strikethrough = True Then
               Zelle.Interior.ColorIndex = 3
           End If
       Next
    End Sub
  4. Code ausführen:

    • Öffne den VBA-Editor mit ALT + F11.
    • Füge ein neues Modul hinzu und kopiere den Code hinein.
    • Führe den Code aus, um die Zellen mit durchgestrichener Schriftfarbe zu markieren.

Häufige Fehler und Lösungen

  • Fehler: „Der Code funktioniert nicht.“

    • Lösung: Stelle sicher, dass die bedingte Formatierung korrekt eingerichtet ist und dass du den richtigen Zellbereich angibst.
  • Fehler: „Ich sehe keine farbigen Zellen.“

    • Lösung: Überprüfe, ob die Schriftart tatsächlich durchgestrichen ist und ob die Formatierung aktiv ist.

Alternative Methoden

Wenn du VBA nicht verwenden möchtest, kannst du die bedingte Formatierung auch manuell überprüfen:

  1. Neues Tabellenblatt erstellen: Erstelle ein leeres Tabellenblatt.
  2. Daten einfügen: Trage in jede Zelle deines neuen Blattes das Wort „bez“ ein.
  3. Format übertragen: Markiere alle Zellen in deinem ursprünglichen Arbeitsblatt und verwende den Format-Pinsel, um die Formate auf das neue Blatt zu übertragen.

Praktische Beispiele

  • Beispiel für die bedingte Formatierung: Wenn du in Spalte K das Wort „bez“ hast und die Zellen in A2:J1550 entsprechend formatieren möchtest, kannst du eine Formel wie =WENN($K99="bez";WAHR) verwenden, um die bedingte Formatierung zu steuern.

  • VBA Beispiel zur Auslesung: Mit dem oben genannten VBA Code kannst du alle Zellen markieren, die die bedingte Formatierung „durchgestrichen“ haben.


Tipps für Profis

  • Verwende Option Explicit: Beginne dein VBA-Modul mit Option Explicit, um sicherzustellen, dass alle Variablen deklariert sind. Dies hilft, Fehler zu vermeiden.

  • Fehlerbehandlung einbauen: Implementiere On Error Resume Next in deinen Code, um mögliche Laufzeitfehler abzufangen, ohne dass das Makro abbricht.


FAQ: Häufige Fragen

1. Wie finde ich alle Zellen mit bedingter Formatierung? Du kannst die Funktion „Inhalte“ nutzen und „Bedingte Formate“ auswählen oder den VBA Code verwenden, um diese Zellen zu identifizieren.

2. Was ist der Vorteil von VBA bei der bedingten Formatierung? Mit VBA kannst du komplexe Bedingungen und große Datenmengen effizienter verarbeiten, als wenn du alles manuell überprüfen müsstest.

3. Kann ich die bedingte Formatierung auch ohne VBA nutzen? Ja, du kannst die Formatierung manuell prüfen oder alternativ die Funktion „Suchen“ in Excel verwenden.

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