Office: Bedingte Formatierung per Command Button ein- und ausschalten

Hallo zusammen, bin durch Google auf dieses Forum aufmerksam geworden und habe eine Frage, weiß aber gar nicht, ob das, was ich mir vorstelle, überhaupt geht.

Ich habe ein Tabellenblatt, in dem einige bedingte Formatierungen hinterlegt sind. Nun möchte ich alle bedingten Formatierungen ausschalten.

Dazu habe ich folgendes:

Private Sub CommandButton1_Click()
If CommandButton1 = True Then
Selection.FormatConditions.delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:="1"
Selection.FormatConditions(1).Font.ColorIndex = 46
Else
Selection.FormatConditions.delete
End If
End Sub

Damit sind ja alle bedingten Formatierungen weg. Gibt es eine Möglichkeit, die bedingten Formatierungen nur auszusetzen, das heißt, durch einen Knopfdruck wieder zu aktivieren??? Wenn ja, welche? Oder muss ich dann jede einzelne bedingte Formatierung wieder per Makro einrichten?

Vielen Dank im Voraus

:)

 

Moin, Rheuma-Kai,

was weg ist, muss neu eingefügt werden (oder Du veränderst die Bedingungen). Ich würde von einer ausgeblendeten Tabelle aus die Bedingten Formatierungen wieder einfügen - stellt sich nur die Frage, ob sich das Problem nicht anders lösen liesse...