Beim Klicken Zellinhalt ändern
12.05.2018 20:54:25
Eilean
Dies ist wohl eine ziemlich banale Frage, aber ich habe es jetzt wirklich lange versucht selbst zu lösen und komme nicht auf einen grünen Zweig...
Ich möchte, dass eine beliebige Zelle genau zwei Werte annehmen kann (a/b) und beim Klicken auf diese Zelle deren Inhalt direkt auf den anderen Wert geändert wird - im Prinzip analog zu einer Checkbox.
Ich habe diese zwei Subs gebastelt, die, jeweils einzeln getestet, auch funktionieren, aber halt immer nur die passende.
Sub klick()
If ActiveCell.Value = "a" Then ActiveCell.Value = "b"
End Sub
Sub klick2()
If ActiveCell.Value = "b" Then ActiveCell = "a"
End Sub
Leider habe ich es mit dem Verschachteln der Ifs nicht hingekriegt (- ja, ich bin eine blutige Anfängerin). Ausserdem soll das Makro ja direkt beim Klicken auf die Zelle laufen.
Also irgendwie so, aber das klappt halt nicht:
Sub wunschmakro()
If Target.Column >= 7 And Target.Column = 7 And Target.Row Kann jemand helfen? Vielen Dank schon mal!