Add Button at Run-time in Code

E

ExcelMonkey

I am trying to add a button to a Form in code. When I run the code below the
form shows without a button on it. Why is this?

Dim NewBttn As MSForms.CommandButton

Set NewBttn = UserForm1.Controls.Add("forms.CommandButton.1")
NewBttn.Top = FirstRowSquareTop * Counter
NewBttn.Left = FirstRowSquareLeft * Counter
NewBttn.Width = FirstRowWidth * Counter
NewBttn.Visible = True
'Set NewBttn = Nothing

UserForm1.Show
End Sub
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

On mouse move get element name? 1
Run time error 91 when trying to add controls to a collection 3
How to hide password? 1
424 Error whem trying to change Visible property 2
HOW CAN I WRITE A CODE TO A COMMANDBUTTON CREATED PROGRAMMATICALLY 1
1004 Application Defined or Ojbect Defined error 2
Routine too fast for Form to Update? 1
run-time error '1004' general odbc error 2

Top