Use command button more then once

[Costertje]

Hi,

I have some simple macro's who I want to start with a click on a command button. When I click on the button he has to run macro1, and when I click again on the same button he has to run macro2 and so on.

Is it possible to run more then one macro after a click on the same button?

When I use my code he runs both maco's after clicking on the button

Sub macro1()
Dim Get_Value As Variant
Range("A1").Select
Range("A1").Value = Range("E1").Value
End Sub
Sub macro2()
Dim setValue_Var As Range
Range("A2").Select
Range("A2").Value = Range("E2").Value
End Sub
Sub CommandButton1_Click()
Call macro1
Call macro2
End Sub

Thanks,
Costertje

[millz]

Assuming you are not using a userform, you can try with a global variable 'remembering' whether you've clicked, and it'll keep alternating between macro1 and 2.

Please Login or Register  to view this content.

[bakerman2]

In ThisWorbook module.

Please Login or Register  to view this content.

In Standard module.

Please Login or Register  to view this content.

In Sheet module (CommandButton code)

Please Login or Register  to view this content.

[Costertje]

Hi,

Thanks for the answers. I've used the code Bakerman2, because that's working fine and I can expand this with more clicks.

Costertje

[bakerman2]

You're welcome.

You may not be aware that you can thank those who have helped you by clicking the small star icon located in the lower left corner of the post in which the help was given.
By doing so you can add to the reputation(s) of those who helped.