How to run two macro different on different clicks on same button

[warriorpoet7176]

Hi Friends,
I got a 2 commands in one VBA which I want to run in same button but I wish that on one click only one command should run and on second click on same button second command should run. For your better understanding I have pasted the code also, this code carries two different functions one is to strikeoff the text in cell and another will undo the strike off.
Now I want that when I clicked the Commandbutton it strikeoff the text of cell but when I again click on the same button it undo the same strikeoff.

Can it be possible ?
If YES than please can you amend the codes and make it as I mentioned above.



Macro Are As Follow:

Private Sub CommandButton5_Click()
ActiveCell.Select
With Selection.Font
.Strikethrough = True
End With
ActiveCell.Select
With Selection.Font
.Strikethrough = False
End With
End Sub

Thanks For Reading The Post.

Regards,

[DBY]

Hello
The easiest way would be to use a Toggle Button rather than a Command. For example, with the Active Cell:

Please Login or Register  to view this content.

Hope this helps.
DBY

[warriorpoet7176]

Hello
The easiest way would be to use a Toggle Button rather than a Command. For example, with the Active Cell:

Please Login or Register  to view this content.

Hope this helps.

DBY

Hi DBY
Thanks for the reply, your idea was very helpful, it resolved my query and this thread

Thank You So Much Once Again !!

[Winon]

Hello warriorpoet7176,

I am happy to see that your issue had been solved, however, in future please do remember to add Code Tags when posting any Code.


Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here


Thank you.