Excel vba - Adding a command button control at run time

[beastofbobmin]

I have this problem that i need to add a new button at runtime at
specific place on the form. this happends when the form button i
pressed . i have no clue on how to tackle this problem as i have neve
before this project tackled vba or vb
can any one help m

 

[Bob Phillips]

Here is some code to ad the control, but you still need event code behind it

Dim newButton As MSForms.Control
Set newButton = Me.Controls.Add("Forms.CommandButton.1")
With newButton
.Caption = "newCmd"
.Left = 50
.Top = 100
.Visible = True
End With

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

 

[Guest]

Try something like this

Private Sub CommandButton1_Click(
Dim btn As Contro
Set btn = UserForm1.Controls.Add("Forms.CommandButton.1", "NewButton", True
With bt
.Caption = "New Button
.Accelerator = "N
.Left = 5
.Top = 3
End Wit
End Su

-Brad Vontur

 

[Tom Ogilvy]

put the button on the form. Make its visible property false. At the
appropriate time, change the visible property to true. This is much simpler
than trying to add it at runtime.