Which userform command button was clicked (VBA)

[haseft]

hi,
how do I find wich command button was clicked?
help with this please.

Dim i As Long
n = 11
For i = 1 To 6
  If UserForm3("cmb" & i) was clicked then ?????
    'do something
  Else
    'do something
  End If
  n = n + 1
Next

 

[RoryA]

You can only run code in response to a button's click by assigning it to the click event, in which case you can pass it as an argument to the procedure.

 

[haseft]

Hi Rorry,
my knowledge is very low in vba,
how?

 

[RoryA]

By using the buttons' Click events. I assume that is how you are calling your code now? You've only posted a small segment of your code which makes it hard to comment specifically.

 

[haseft]

I have a UserForm3 with 6 command button.
If I click to cmb1 then I want to do some procedures.
I just want to know wich command button I clicked in userform.

 

[RoryA]

You have to use the control's click event to trigger the routines. If those routines need to know which button called them (it's not clear why that would be the case), pass it as an argument:

Private sub cmb1_Click()
macro1 cmb1
macro2
macro3 cmb1
end sub

for example. You would need to modify those routines to take an argument if they don't already.

 

[haseft]

here is the cod.

Dim i As Long
n = 11
For i = 1 To 6
  If UserForm3("cmb" & i) was clicked then ?????
     ThisWorkbook.FollowHyperlink Address:=Range(ListBox1.Column(3, ListBox1.ListIndex)).Offset(0, n).Value, NewWindow:=True
  End If
  n = n + 1
Next

 

[RoryA]

It looks like you could simply pass a number as the argument rather than the actual button object. If you need help with that, please post the full code including the procedure declaration.

 

[haseft]

In userform there is only 6 command button, nothing else. .
found out wich one is clicked?

Dim i As Long
For i = 1 To 6
  If UserForm3("cmb" & i) was clicked then ?????
     MsgBox " Button &" cmb & i" was clicked"
  End If
Next

 

[mikerickson]

I join with RoryA in wanting to see your full code, but you might look at the userform's ActiveControl property to see which button was clicked. Its not super reliable (depending on the TakeFocusWhenClicked property of the command buttons).