wie erreiche ich es, dass bei jedem Klick auf eine Zelle der Zellwert um 1 erhöht wird, auch wenn die Zelle schon aktiviert ist?
Gruß Hajo
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target = [A1] Then [A1] = [A1] + 1
End Sub
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target = [A1] Then [A1] = [A1] + 1
Cancel = True
End Sub