Quick solution for 400 increment macro's with VBA?

[ienimieni]

Hello community,

Excel/macro noob here. I have a question. currently i am working on a 'barman list' in excel where the barman can click the + and the - to increment or decrement a value. For examle, "john" orders a drink, the barman clicks the + button behind his name and a 1 will appear. I have around 40 people that need to be on the list, x 4 the types of drinks and snacks. This is a huge job if i need to make a seperate VBA macro for each thing (40 x 8 = 320 !!)

Is there a way to make this way quicker?

Photo of example here:

The + and the - is a shape with a macro connected to it (only at the first row are macro's connected, obviously).

I hope you can help! Thanks!


- Rob

 

[Fluff]

Hi & welcome to MrExcel.
You could something like this for all the + shapes

Sub ienimieni()
   With ActiveSheet.Shapes(Application.Caller).TopLeftCell.Offset(, -1)
      .Value = .Value + 1
   End With
End Sub

 

[Eric W]

I wouldn't use shapes or macros at all for something like this. Go to the Developer tab. (If you don't have it visible, go to File > Options > Customize Ribbon > and check the Developer box on the right.) Then go to Insert > Spin Button (form control). Use the mouse to paint it on the sheet where you want it. Then right click it > Format Control > Control tab > and set the Cell link to where you want the value to go.

 

[diddi]

or you could also make a userform and employ spinbuttons. same idea really