Button that will increment by 1

  • Thread starter Thread starter Mr-Re Man
  • Start date Start date
M

Mr-Re Man

I am in the process of trying to create a spreadsheet that will have 5 buttons.
I want to position the button in cell B2, then when pressed it will
increment cell C2 by 1.

Then I need to repeat this 4 times so I'll have buttons and results in cells
B3 & C3, B4 & C4 etc.

I used this code from another thread, Selection.Value = Selection.Value + 1,
but it didn't work for 2 buttons, it incremented the same value whichever
button was pressed.
 
Hi,

View|Toolbars|Forms and click the 'Button Icon' and draw a button over B2 by
dragging. As soon as you stop dragging in the popup window click 'New' and
enter this code

Sub Button1_Click()
Range("C2").Value = Range("C2").Value + 1
End Sub

It will already have the first and last lines. Repeat this process for your
other buttons modifying the range C2 as appropriate.

Mike
 
Awesome, thank you so much

Mike H said:
Hi,

View|Toolbars|Forms and click the 'Button Icon' and draw a button over B2 by
dragging. As soon as you stop dragging in the popup window click 'New' and
enter this code

Sub Button1_Click()
Range("C2").Value = Range("C2").Value + 1
End Sub

It will already have the first and last lines. Repeat this process for your
other buttons modifying the range C2 as appropriate.

Mike
Click to expand...
 
Back
Top