assign Code to Dynamic CommandButton

[hajiali]

Hello Every one I have Created

within my Userform9 Code

Private Sub userform_initialize()

I have created the Following Command Button

Set CmdBtn = UserForm9.Controls.Add("Forms.CommandButton.1")
    With CmdBtn
        .Caption = "ENTER"
        .Name = "CmdBtn" & 1
        .Left = 350
        .Top = 33
        .Width = 70
    End With

The button is created however I need to run code when "ENTER" button is CLICK

I have tried

Private Sub CommandButton1_Click()
MsgBox "You Clicked the Command button", vbOKOnly
End Sub

What will I need to add to make it work. any help is greatly appreciated.

 

[NoSparks]

once you gave it a name it was no longer CommandButton1, use the name you gave it

 

[Fluff]

Why not just add the button to the userform at design time, rather than with code?

 

[hajiali]

Why not just add the button to the userform at design time, rather than with code?

The entire Userform is dynamic so the position of the button is also dynamic.

NoSparks
once you gave it a name it was no longer CommandButton1, use the name you gave it

I thought I tried it with the giving name but must have a different name when I place the Click Sub. but it work when copied the name Thanks. for yall help.