ich komme derzeit nicht weiter.
Ich habe folgenden Code:
Private Sub CommandButton1_Click()
If Range("FW24").Interior.ColorIndex = -4142 Then
Range("FW24") = 1
Else
Range("FW24") = ""
End If
End Sub
Damit wird in die Zelle FW24 eine 1 eingefügt wenn die Zelle mit der Farbe -4142 markiert ist. Für eine Zelle funktioniert es gut. Wie kann ich diese Formel für einen BEreich erweitern z.B. FN22:GU31, sodass alle Zellen mit einer 1 gefüllt werden, die die Farbe -4142 haben. Die anderen sollen gleich bleiben.Und wie schaffe ich es, dass diese Formel automatisch ausgeführt wird ohne auf einen Button drücken zu müssen.
Vielen Dank für die Hilfe :=)