Farbe ermitteln
18.03.2008 09:30:29
Kurt
Dim farbe As String
ActiveSheet.Range("J1").Select
farbe = Selection.Interior.ColorIndex.Value
MsgBox farbe
leider Fehlgeschlagen, vielleicht kann mir jemand helfen ?
gr Kurt P
Anzeige