ich möchte auf meinem sheet eine Schaltfläche einfügen und dort als code hinterlegen, dass der Wert der jeweils ausgewählten Zelle bei Klick auf die Schaltfläche um +1 erhöht wird.
wie geht das?
Viele Grüße aus Hamburg
Ray
Private Sub CommandButton1_Click()
If Selection.Count = 1 And IsNumeric(Selection) Then
Selection.Value = Selection.Value + 1
End If
Selection.Select
End Sub
Klappt es?