Regeln zur bedingten Formatierung ordnen

Hallo liebe Excel-Gemeinde,

ich stelle schon länger fest, dass sich mitunter bedingte Formatierungen selbstständig machen bzw. sozusagen "entartete" Ableger von sich schaffen.
Bei diesen ist dann zwar noch die Regel identisch, aber der zugeordnete Zellenbereich ist für mich nicht nachvollziehbar aus dem Kontext gerissen.

Das fällt dann immer erst auf, wenn ich nach einer ganzen Weile der Tabellennutzung z.B. eine weitere bedingte Formatierung in einem Arbeitsblatt hinzufügen oder auch eine bestehende erweitern möchte.

Kann mir jemand sagen, wie und warum das kommt?

Außerdem (und vielleicht noch wichtiger für mich zu wissen) wäre ich sehr dankbar über Tipps und alternative Möglichkeiten, die (von mir gemachten, vor allem aber die dann ungewollt hinzubekommenen) bedingten Formatierungen wieder aufzuräumen bzw. schnell zu löschen.

Bei meinem Beispiel sind nun schon so viele ungewollte Regeln hinzugekommen, dass der Manager dafür viel zu unübersichtlich ist. Kann man dies auf anderem Wege bzw. komfortabler und übersichtlicher machen?

Ich füge mal einen Screenshot von meinem Problem hier an:
Userbild

Gelb markiert ist das, wie es mal für jede andere Regel hier auch angelegt war und auch wieder und ausschließlich sein soll, rot umrandet ist der ungewollte Auswuchs.

Ich hoffe und freue mich sehr auf Expertenwissen.

:-)

Vielen Dank und Gruß,

Norman

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Norman,

ich habe vor Jahren bei einer umfangreichen Datei, bei der es zwangsweise Änderungen gibt, ein Makro erstellt, durch das erst alle bedingten Formatierungen gelöscht und dann neu erstellt werden. Gestartet wird das Makro bei Bedarf, wenn ich z.B. die Datei auf Konsistenz überprüfe oder auch andere umfangreiche Anpassungen vornehme, z.B. über einen Button. Wichtig: Alle Filter und Ausblendungen zuerst deaktivieren.
Das Makro habe ich damals teilweise über den Recorder erstellt und überarbeitet:

Sub Gold_BlattallePhasen()

  If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData
    Selection.AutoFilter
    Columns("A:O").Select
    Range("A2").Activate
    Selection.EntireColumn.Hidden = False
    Range("A4").Select
    
    Cells.FormatConditions.Delete
    
    Range("A3:I660").Select
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$D3=""x"""
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .ColorIndex = 19
    End With
    Selection.FormatConditions(1).StopIfTrue = False
    ActiveCell.Range("A1:J660").Select
    Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$N3=""na"""
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
      .ColorIndex = 15
    End With
    Selection.FormatConditions(1).StopIfTrue = False
    
 End Sub

Gruß, Margarete

Beliebteste Forumthreads (12 Monate)

Regeln zur bedingten Formatierung ordnen

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

304 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Regeln zur bedingten Formatierung ordnen

12 Beiträge zum Forumthread Beiträge zu diesem Forumthread

304 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

12
Beiträge zum Forumthread

Beiträge zu diesem Forumthread