Eingefügte Form einfärben wenn Zelle = WAHR/FALSCH
15.08.2023 09:46:43
thimo
habe nochmal ein Problem.
Ich habe eine Zelle "X11", in dieser Zelle steht entweder WAHR oder FALSCH. Durch klick auf ein Formularsteuerelement lässt sich der Wert der Zelle tauschen.
Sub Innensechskant_tgl()
Range("x11").Value = Not Range("x11").Value
End Sub
So sieht der Code bis jetzt aus und funktioniert auch.
Ich möchte diesen Button durch eine Form ersetzen um die Farbe ändern zu können.
Wenn also in Zelle "X11" WAHR Steht so soll sich diese Form (gleichzeitig der neue Button) grün formatieren, wenn FALSCH in "X11" steht soll Sie rot sein. Habe es mit Makrorecorder ausprobiert doch leider die Verbindung zur Zelle nicht hinbekommen.
Vielen Dank im Vorraus.