Guten Morgen Allerseits, ich wollte hiermit die Farbe der Zelle ermitteln:
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