Excel Userform VBA to get the TAG value of a Clicked CommandButton

Hi,

I have a simple Userform with 14 command buttons. Depending what routine and conditions 2 or more Command Buttons will become visible.

I found the class code to that returns the pressed button's Caption and that works, but I need to get the clicked Button's TAG.

I do not want to to add 14 Sub CommandButtonx_Click routines, I just need one common routine that will run one macro that will return the TAG value of the button clicked and the rest of the code.

Private Sub UserForm_Initialize()
Dim ctrl As MSForms.control
Dim clsObject As Class1


'Create New Collection To Store Custom
Set colButton = New Collection
For Each ctrl In Me.Controls
If TypeName(ctrl) = "CommandButton" Then
Set clsObject = New Class1
Set clsObject.Button = ctrl
colButton.Add clsObject
End If
Next
End Sub

Something similar but to Return the TAG

Thanks in advance

Forgot to mentio that I also posted this on the Excelforum: https://www.excelforum.com/exc…ndbutton.html#post5381743

Hi Roy, true and simple.

I also got some code provided by Greg M on the Excel forum that solved the issue too.

Thanks for you tip and solution

Just a question, the number of active command buttons may vary from 1 to 14 < I still don't want to add a whateverbutton_Click routine for each of the 14 possible buttons, I just ned one command that will return the TAG value that I need as parameter for another routine. So I'm still stuck to a class module that does that, is this a correct assumption?