Das Archiv des Excel-Forums

Bedingte Formatierung mit UND Verknüpfung


Betrifft: Bedingte Formatierung mit UND Verknüpfung
von: Holgi

Geschrieben am: 18.09.2019 17:40:12
Hallo,

ich suche eine Möglichkeit abhängig von dem Inhalt (Text) mehreren Zellen in einer Zeile einen (eventuell auch unterbrochenen) Bereich in der jeweiligen Zeile einzufärben.

Mit dem folgenden Code kann ich jede einzelne Zelle in dem Bereich formatieren:

With Worksheets(1).Range("I1:K10").FormatConditions.Add(xlCellValue, xlEqual, "Passed")

Ich habe aber noch keine Idee wie ich z.B verschiedene Zelleninhalte über den Range
1. UND verknüpfe: Inhalt(I1 + J1 + K1)
2. Den Inhalt der einzelnen Zellen eventuell auch ODER verknüpfe (I1 ="Passed" oder "Pass" oder "OK"). Würde mit viel Code auch mit Punkt 1 gehen

um dann die Bedingte Formatierung anzuwenden.

Vielen Dank
Grüße Holgi

Betrifft: Richtig, mit =Oder(...;...;...) ...
von: 1713724.html
Geschrieben am: 18.09.2019 17:58:27
Hallo

I1:K1 markieren ... dann

bedingte Formatierung
Formel:

=ODER(I1="Passed";I1="Pass";I1="ok")


da brauchst Du kein VBA

Gruß Matthias

Betrifft: AW: Richtig, mit =Oder(...;...;...) ...
von: 1713735.html

Geschrieben am: 18.09.2019 18:35:57
Hallo Matthias,

bekomme jeden Tag einen neuen Excel Export aus einer anderen Anwendung bei dem ich mit verschieden Makros mir erst einmal einen Überblick (Zählen, Hervorheben, Breite einstellen, durchstreichen...)verschaffen muss.

Hatte vorher schon die verschiedensten bedingten Formatierung eingesetzt.

VBA nimmt mir bis jetzt schon viel manuelle Arbeit ab .... wenn ich verstehe wie ;-)

Danke
Grüße Holger

Betrifft: AW: Richtig, mit =Oder(...;...;...) ...
von: 1713743.html
Geschrieben am: 18.09.2019 19:22:03
Schalte den Makrorecorder ein und benutze die Formel für die "manuelle" bedForm von Matthias - dann hast du deine(n ) Code(zeile).

Betrifft: UND Verknüfung bei bedingter Formantierung
von: 1713916.html

Geschrieben am: 19.09.2019 14:43:53
Hallo,
die Oder- Verknüpfung in der einzelnen Zelle war eigentlich nicht mein Hauptproblem, der Lösungsvorschlag von euch hat mir aber trotzdem sehr geholfen.
Das Hauptproblem war die UND- Verknüpfung der Bedingungen bei mehreren Zellen und dann die Formatierung von mehreren Zellen in der jeweiligen Zeile
Anbei mein Codebeispiel wie es jetzt Funktioniert:

Sub Bedingte Formatierung()
'Auswahl mehrere Spalten (I bis K und M) auf die die Formatierung angewendet werden soll
Range("I:K,M:M").Select
'UND Verknüpfte Bedingungen von 3 Spalten
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=UND(($I1=""Passed"");(ODER($J1=""Passed"";$J1=""Pass"";$J1=""ok""));($K1=""Done""))"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 5287936
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = True
End Sub

Vielen Dank für Eure Hilfe
Grüße Holgi

Excel-Beispiele zum Thema "Bedingte Formatierung mit UND Verknüpfung"

Bedingter Mittelwert download Jahreskalender und bedingte Formatierung download
Bedingte Übergabe des Focus und Setzen der Schreibmarke im Dialog download Bedingte Formatierung auslesen download
Über die bedingte Formatierung den Minimalwert markieren download Über bedingte Formatierung Hintergrundfarbe bei Zelleingabe ändern download
Bedingte Formatierung in Abhängigkeit eines Zellkommentars download Markierung von Formeln über bedingte Formatierung download
Zeitabhängige Zellmarkierungen über bedingte Formatierung setzen download Tabellenvergleich über die bedingte Formatierung download
Wert eintragen, wenn Bedingte-Formatierung-Bedingung zutrifft download Eine Reihe von Beispielen zum Feature "Bedingte Formatierung" download
Automatische Datumformatierung unterdrücken download Zahlenformatierung mit Punkt nach der 1. Ziffer download
Unterschiedliche Schriftformatierung in Kopf-/Fußzeile download Zelleinträgen über die Formatierung Spaltennamen hinzufügen download
Hyperlink-Formatierung bei Eingabe von Email-Adressen verhindern download Zahlen-Formatierungs-Dialog aus UserForm aufrufen download
Werte in Abhängigkeit zur Währungsformatierung summieren download Bei TextBox-Eingaben Mustervergleich und Formatierung download
Externe Verknüpfungen lokal umleiten download Verknüpfungen der aktiven Mappe listen download
Verknüpfung zu einer Mappe durch Eingabe der Zelladresse download Quellarbeitsmappe einer Verknüpfung wechseln download
Letzte Verknüpfung in einem Tabellenblatt löschen download Verknüpfungen in 2. Blatt transponiert anlegen download
Dateiname, Tabelle und Berreich zu einer Verknüpfung verbinden download Details von Verknüpfungen sollen aufgelistet werden download
Verknüpfungsdialog aus VBA aufrufen download Verknüpfungen bei x-Eingabe erstellen bzw. löschen download
Dateien öffnen, Verknüpfungen aktualisieren, speichern, schießen download