Microsoft Excel

Herbers Excel/VBA-Archiv

Bedingte Formatierung geht weg

Betrifft: Bedingte Formatierung geht weg von: Elmar
Geschrieben am: 01.04.2020 14:08:44

Hallo Experten,
ich hab ein Problem mit der Bedingten Formatierung, die ich über VBA mache.
Das funktioniert auch problemlos, aber was ich nicht verstehe ist, dass wenn man im Bereich der Zeilen irgendeine Einheit filtert in der Pivot, dann haut es die gesamte bedingte Formatierung raus.
Gleiches passiert auch, wenn ich mit einen Doppelklick auf einen Wert klicke und mir die Daten dazu einzeigen lasse, auch dann ist die Formatierung weg.

Hat jemand eine Idee, weshalb das passiert und was ich da anders machen könnte?

VG

Elmar

Range("K5").Select
Range("K5:AB" & irow3).Select

Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=UND($AE5>0;K5>0;K5>$AE5)" ~f~
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Font
.ThemeColor = xlThemeColorDark1
.TintAndShade = 0
End With
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 255
.TintAndShade = 0
End With


Selection.FormatConditions(1).StopIfTrue = False

Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
~f~ "=UND($AF5>0;K5<$AF5;K5>0)"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 15773696
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False

Betrifft: bedF über VBA ist bis inkl. 2016 fehlerhaft ...
von: lupo1
Geschrieben am: 01.04.2020 15:27:47

... und bei Pivot mit BedF müsste man wissen, was genau passiert, und ob Du das Format korrekt zugewiesen hast.

Betrifft: AW: bedF über VBA ist bis inkl. 2016 fehlerhaft ...
von: Elmar
Geschrieben am: 01.04.2020 15:52:29

Hallo Lupo1,
ich habe mal eine Testdatei hochgeladen.
Wenn ich nun zum Beispiel in Spalte A einen Filter setze, haut es die komplette Formatierung raus.
Vielleicht hast Du eine Idee..

https://www.herber.de/bbs/user/136323.xlsb

VG

Elmar

Betrifft: AW: bedF über VBA ist bis inkl. 2016 fehlerhaft ...
von: Elmar
Geschrieben am: 01.04.2020 16:57:31

Hallo Lupo1,
ich habe mal eine Testdatei hochgeladen.
Wenn ich nun zum Beispiel in Spalte A einen Filter setze, haut es die komplette Formatierung raus.
Vielleicht hast Du eine Idee..

https://www.herber.de/bbs/user/136323.xlsb

Hab vergessen das Häckchen zu setzen bei offen.....

VG

Elmar

Beiträge aus dem Excel-Forum zum Thema "Bedingte Formatierung geht weg"