Problem mit Interior.ColorIndex

[Klaus Kammann]

Hey!

Nimm doch einfach:

.Interior.color statt colorindex

Gruß

Klaus

[Martin Fischer]

Hallo Lars,

dann klappt es. Gibt es dafür eine Erklärung oder mache ich etwas falsch?

Ich vermute mal, dass Deine Zellen unterschiedliche Werte für die
PatternColorIndex-Eigenschaft haben. Zellen mit der Eigenschaft
Interior.PatternColorIndex = xlColorIndexNone geben immer einen
ColorIndex von -4142 zurück (dies entspricht dem Wert der Konstanten
xlColorIndexNone).

Überprüfe in Deinem Code, ob Du einmal explizit die Eigenschaft
PatternColorIndex auf xlColorIndexNone festlegst.

Herzliche Grüsse
Martin

[Claus Busch]

Hallo Lars,

ich frage mit folgendem die Farbe einer Zelle ab, um in einem anderen eben
diese Farbe zu verwenden
If grngWochentag.Interior.ColorIndex = 2 Then
grngBemerkungen1.Interior.ColorIndex = 2
Leider funktioniert das nicht immer. Ich habe herausgefunden, dass die Farbe
"2" in diesem Beispiel von Excel (oder VBA?) auch mit "-4142" gehandelt wird.
If grngWochentag.Interior.ColorIndex = -4142 Then
grngBemerkungen1.Interior.ColorIndex = 2
dann klappt es. Gibt es dafür eine Erklärung oder mache ich etwas falsch?

wie hast du die Zellen eingefärbt? Nach Farbe abfragen kannst du nur bei
händisch eingefärbten Zellen. Bei durch bedingte Formatierung eingefärbten
Zellen bekommst du immer den Wert -4142, also nicht eingefärbt.
Wenn die Zellen bedingt eingefärbt sind, solltest du die Bedingung
abfragen.