Office: Feste Beträge zu einer Zelle addieren

Hallo zusammen,
Problem:
Eine Zelle (z.B. A1) hat den Wert 0.
Ich möchte Schaltflächen definieren, die zu dieser Zelle jeweils einen ganz bestimmten Betrag addieren.
Bei Betätigen der Fläche A wird 1 addiert, bei Fläche B wird 2 addiert usw.
Und in der Zelle A1 steht dann jeweils die aktuelle Summe.
2 x Fläche A, 3 x Fläche B: Summe in A1 sollte dann 8 sein.
Soweit klar?
Bitte um reichlich Hilfe.

 

Hallo!

Dann erstelle die Buttons aus der Symbolleiste "Steuerelemente-Toolbox" und weise ihnen Codes dieser Art zu:

Code:

Private Sub CommandButton1_Click()
Range("A1") = Range("A1") + 1
End Sub

 

Hallo Schatzi,
super. Danke!