Text-&Listbox in UF aktiv wenn Zellfarbe rot
11.10.2018 17:43:31
Sönke
...ich komme nicht weiter!
Ich lese eine Zelle im aktiven Tabellenblatt aus in eine Textbox einer UF. Ich lese sowohl den Wert (Name), als auch die Hintergrundfarbe aus. Ich schaffe es aber nicht zu sagen, dass bspw. Text- und Listbox6 in der UF dann ausgeblendet und deaktiviert werden, wenn die Hintergrundfarbe der Zelle nicht rot (RGB(255, 0, 0)) ist.
Ich habe Folgendes probiert, aber es funzt nicht:
If ActiveSheet.Cells(20, 9).Interior.Color RGB(255, 0, 0) Then
TextBox6.Visible = False
ListBox6.Visible = False
Else
TextBox6.Visible = True
ListBox6.Visible = True
Ebenso geht es nicht, wenn ich die Hintergrundfarbe zunächst in die Textbox übertrage und dann sage, das bei roter Backcolor o.g. Ereignisse eintreten.