Farbindex bei bedingter Formatierung
07.04.2005 14:28:45
Harald
ich hab einen umfangreichen Zellenblock hellgrün hinterlegt und per bedingter Formatierung werden (bei Wertüber- bzw. unterschreitung) die jeweiligen Zellen rot gefärbt.
Danach wollte ich eigentlich per selbstdefinierter Funktion, die roten Zellen zählen....tut's nicht.Die hellgrünen Zellen zählt er wunderbar....auch wenn sie per bed. Formatierung rot sind ;-((
Habe dann versucht mit diesem Code den ColorIndex einer roten Zelle zu ermitteln, aber statt der 3 (rot) zeigt er mir die 35 (hellgrün).
Sub Farbnummer()
Dim i As Integer
i = ActiveCell.Interior.ColorIndex
MsgBox " Farbindex ist " & i
End Sub
Wie bekomm ich den Farbindex der bedingten Formatierung ?
Gruß
Harald