Bedingte Formatierung: suche nach

• Bedingte Formatierung: suche nach von Ulrich Erlenmaier vom 05.11.2003 08:08:11
  • AW: Bedingte Formatierung: suche nach - von Hajo_Zi am 05.11.2003 08:34:53
  • AW: Bedingte Formatierung: suche nach - von Holger Levetzow am 05.11.2003 09:04:15
    • AW: Bedingte Formatierung: suche nach - von Ulrich Erlenmaier am 05.11.2003 09:48:10
      • AW: Bedingte Formatierung: suche nach - von Hajo_Zi am 05.11.2003 10:02:41
      • AW: Bedingte Formatierung: suche nach - von Ulrich Erlenmaier am 05.11.2003 10:39:47
        • AW: Bedingte Formatierung: suche nach - von Hajo_Zi am 05.11.2003 11:08:56

Betrifft: Bedingte Formatierung: suche nach
von: Ulrich Erlenmaier
Geschrieben am: 05.11.2003 08:08:11
Hallo,
ich möchte in einer Excel Tabelle nach allen Zellen suchen, deren bedingte Formatierung rot ist. Wenn ich nach Zellen mit Formatierung "rot" suche, werden die Zellen, deren bedingtes Format rot ist nicht ausgewiesen.

Kann mir da jemand helfen??? (am besten VBA Code, wenn nicht aber auch gerne die Vorgehenswiese in Excel)
Vielen Dank

Betrifft: AW: Bedingte Formatierung: suche nach
von: Hajo_Zi
Geschrieben am: 05.11.2003 08:34:53
Hallo Ukrich

das komplizierteste was ich in EXcel kenne ist die bedingte Formatierung auslesen.

schaue mal auf meine Homepage da ist ein Beispiel auf der Seite Fremde Dateien.

Falls Code vorhanden wurde dieser getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro



Betrifft: AW: Bedingte Formatierung: suche nach
von: Holger Levetzow
Geschrieben am: 05.11.2003 09:04:15
Hallo Ulrich,
so schwer ist das gar nicht. Folgender Code z.B. sucht alle Zellen im Bereich, deren Hintergrung rot ist.
'sucht Zellen mit rotem Hintergrund in A1:A3

Sub Makro1()
For Each cell In Range("A1:A3")
'alle 3 Bedingungen testen
For i = 1 To cell.FormatConditions.Count
If cell.FormatConditions(i).Interior.ColorIndex = 3 Then
MsgBox (cell.Address)
End If
Next
Next
End Sub

Holger

Betrifft: AW: Bedingte Formatierung: suche nach
von: Ulrich Erlenmaier
Geschrieben am: 05.11.2003 09:48:10
Hallo Holger,
vielen Dank! das Problem ist allerdings eher, daß ich rausfinden möchte, ob die bedingte Formatierung der Zelle momentan rot ist, ob also die Bedingung erfüllt ist oder nicht.

Betrifft: AW: Bedingte Formatierung: suche nach
von: Hajo_Zi
Geschrieben am: 05.11.2003 10:02:41
Hallo Ulrich

meinem Beitrag hast Du schon gelesen????

Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro



Betrifft: AW: Bedingte Formatierung: suche nach
von: Ulrich Erlenmaier
Geschrieben am: 05.11.2003 10:39:47
Hallo Hajo,
vielen Dank, mit dem Makro funktioniert es; allerdings handelt es sich um eine Abfrage für ziemlich viele Felder, die zeitkritisch ist. Jede Zelle mit dem Makro abzufragen dauert daher zu lange. Daher war meine Hoffnung, dass man einfach über die Suchfunktion nach allen Zellen mit der bedingten Farbe rot suchen könnte... Hast Du noch eine andere Idee?

Ulrich

Betrifft: AW: Bedingte Formatierung: suche nach
von: Hajo_Zi
Geschrieben am: 05.11.2003 11:08:56
Hallo Ulrich

Bei Fragen zu meiner Antwort, antworte ich nur, wenn die Frage hinter meiner Antwort steht oder ich lustig bin.
Mit der automatischen E-Mailbenachrichtigung werden nur die letzten beiden Beiträge angezeigt und in diesem Fall sehe ich meine Antwort nicht mehr, wenn die Frage nicht richtig plaziert wurde.

Das hatte ich schon in meinem ersten Beitrag geschrieben das es aufwendig ist. Der vorgeschlagene Code ist nicht zwischen 12:00 und Mittag entstanden. Da haben sich schon einige Fachleute über Tage einen Kopf gemacht. Die hätten es bestimmt auch rausgefunden wenn es einfacher geht.

Falls Du nur eine Bedingung für Rot hast kannst Da die ja in VBA nachbauen und so prüfen welche Zellen Rot sind.


Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro

Excel-Beispiele zum Thema " Bedingte Formatierung: suche nach"
Bedingter Mittelwert	Jahreskalender und bedingte Formatierung
Bedingte Übergabe des Focus und Setzen der Schreibmarke im Dialog	Bedingte Formatierung auslesen
Über die bedingte Formatierung den Minimalwert markieren	Über bedingte Formatierung Hintergrundfarbe bei Zelleingabe ändern
Bedingte Formatierung in Abhängigkeit eines Zellkommentars	Markierung von Formeln über bedingte Formatierung
Zeitabhängige Zellmarkierungen über bedingte Formatierung setzen	Tabellenvergleich über die bedingte Formatierung