Counting, command button and programming in VB

[Guest]

Need to create a command button that count, in a single cell, each time I
press it. I press it ones, and in a1 it says 1. I press it one more time, and
a1 says 2 and so one. I can’t use VB, so if anyone can help me, I need the
whole programming.

Appreciate any help.

ElFrodo

 

[Alan]

Assuming its just a single cell you want to increment,
Hit Alt and F11 to open the VB Editor,
Click 'Insert' on the top toolbar and click 'Module' (not 'Class Module')
Copy and paste this code into the blank window of the module,

Sub Increment()
Range("A1") = Range("A1") + 1
End Sub

Change the range from A1 to suit your needs,
If you want it do the same on any selected cell use,

Sub Increment()
ActiveCell = ActiveCell + 1
End Sub

Exit the VB Editor, (just click the top right 'X')
In the Excel window, go 'View' > 'Toolbars' > 'Forms' and click the command
button which is the second one down on the right,
Right click it and go 'Assign Macro' and select 'Increment' which will be
the only option unless you have other macro's in the file,
Right click it again and edit the text from 'Command Button1' to whatever
you want to call it, right click again and drag it where you want it on the
screen and there you go,
Regards,
Alan.

 

[Alan]

Forgot this bit,

'In the Excel window, go 'View' > 'Toolbars' > 'Forms' and left click the
command
button which is the second one down on the right,'

After that, left click anywhere in the Excel window,
Alan.

 

[Guest]

Thanks Alan

It’s nice of you to respond so fast.

Have a nice day and soon a good weekend.

Best regards from Norway.

ElFrodo

Alan skrev:

 

[Alan]

Best Regards from London, let me know if it works! It should do,
Alan.

 

[Guest]

Hey.

It’s working perfectly.
It took some time, because my Excel is in Norwegian and hade to find the
right menu and buttons.

Thanks again.

ElFrodo

Alan skrev: