Farbe von Farbwert (Zahl) ermitteln
11.06.2008 16:04:09
Farbwert
folgendes Makro habe irgendwo in diesem Forum gefunden.
Mit der SummeWenn kann man dann auch die Total-Werte jeder Zahl ermitteln.
Nun würde mich aber interessieren, ob man umgekehrt eine Zahl eingeben kann und mit dieser
Zahl in der Zellen Rechts die Farbe erstellen kann.
z.B. 8 in C2 eingeben, und in B2 die entsprechende Farbe "malen"
Danke für Hilfe
Markus
Function Farbe(Zelle)
' Farbindex der Hintergrundfarbe der Zelle ermitteln
' z.B. Zelle B1 einfärben,
' in Zelle C1 folgende Formel eingeben:
' =farbe(B1)
Farbe = Zelle.Interior.ColorIndex
End Function