Office: Bereich Bedingte Formatierung

Hi Helfer,

ab Excel2010 kann man sich mit folgendem Code den Bereich anzeigen lassen, auf den sich eine bedingte Formatierung bezieht:

Code:

Problem: ich möchte dieser Zelle einen neuen Bereich zuweisen z.B. B1: D20.

Dieser Codeversuch funktioniert nicht (Laufzeitfehler: Objekt unterstützt diese Eigenschaft oder Methode nicht):

Code:

Dieser Versuch funktioniert ebenfalls nicht (selber Fehler):

Code:

Der folgende Code löst zwar keinen Fehler aus, ändert aber nicht den Bereich:

Code:

Frage: Gibt es eine Möglichkeit, den Bereich direkt zu ändern und wenn ja, wie?



Mir ist natürlich klar, dass man die Bedingung als solche ganz normal dem Bereich zuweisen kann, aber ich möchte einfach nur den Bereich anpassen und nicht vorher die Bedingung auslesen müssen, um sie wieder neu zu erstellen.




:)

 

Hallo Beverly,

laut F1-Hilfe gibt es für das FormatConditions-Objekt nur die folgenden Methoden:

Add Method
AddAboveAverage-Methode
AddColorScale-Methode
AddDatabar-Methode
AddIconSetCondition-Methode
AddTop10-Methode
AddUniqueValues-Methode
Delete (Methode)
Item (Methode)

Einfach nur den Bereich anpassen, ist somit wohl nicht vorgesehen.

 

Hallo,

die Eigenschaft AppliesTo gibt es selbstverständlich, aber als Eigenschaft des FormatCondition-Objekts und nicht des FormatConditions-Objekts.
Das Problem ist ein anderes, ein Blick in den Objekt-Katalog offenbart:

Die richtige Methode lautet ModifyAppliesToRange:

PHP:

         Option Explicit

Public Sub test()
Cells(1, 1).FormatConditions(1).ModifyAppliesToRange Range:=Cells(1, 2).Resize(7, 1)
End Sub


 

Hi,

vielen Dank für die Antwort - Modify ist das Zauberwort und hat mein Problem gelöst.


Was mir vom Verständnis her jedoch unklar ist, ist folgendes:

Mit diesem Code

Code:

wird aber doch das Conditions-Objekt angesprochen und nicht das Condition-Objekt - oder sehe ich das falsch?

 

Hallo,

das siehst Du in der Tat falsch, mit FormatConditions(1) sprichst Du ein Element (Item) der FormatConditions-Collection an, das wiederum ein Objekt der FormatCondition-Klasse (ohne s) darstellt...

Gruß, Muller

 

Hi,

richtig, das ist das 1. Element und mit MsgBox Range("B1").FormatConditions(1).AppliesTo.Address wird die Bezugsadresse dieses einen FormatConditions-Objektes wiedergegeben.
Wenn sich AppliesTo auf das FormatCondition-Objekt (ohne s) bezieht, müsste doch MsgBox ActiveCell.FormatCondition.AppliesTo.Address die Adresse aller bedingten Formatierungen der Zelle anzeigen - nein, es muss sich explizit auf ein spezifisches FormatConsitions-Objekt (mit s) bezogen werden, um den Bereich zu erhalten. Und das ist doch in sich ein Widerspruch.

 

Hallo,

...auweia, auweia....*rolleyes.gif* *cool.gif*

Gruß, Muller