Adding textbox to page at runtime

[salvo]

Hi,
I am trying to write a routine to be able to place a textbox on a multipager layout that is on a userform during program execution. I am able to place a textbox on the userform but not on the page of a userform. Below is a snippet of code i found on this forum but it only puts the text box on the form not the page sitting on the form. Thanks


Private Sub CommandButton1_Click()
Dim newtxtbox As MSforms.Control

Set newtxtbox = UserForm1.Controls.Add("Forms.Textbox.1")
With newtxtbox
.Name = "new box"
.Left = 10
.Top = 10
.Width = 50
.Height = 20
.Visible = True
End With
End sub



Any suggestions



Thanks

 

[mikerickson]

Adding controls at run-time is problematic, particularly when it comes to writting event code for those controls. Creating all the needed controls at design time and toggeling their Visible property at run-time is a more robust approach.

Having said that, the syntax you asked about is

Set newtxtbox = UserForm1.MultiPage1.Pages("Page1").Controls.Add("Forms.Textbox.1")

 

[Norie]

salvo

I've got a suggestion - don't do/try it.

As Mike has said it's problematic at least and I really don't see the point of doing in the first place.

 

[salvo]

salvo

I've got a suggestion - don't do/try it.

As Mike has said it's problematic at least and I really don't see the point of doing in the first place.

Norie - i would love to avoid the problem, but i have multiple input textboxes which may run into the hundreds at worst case. It all depends on what options the user picks. Apart from the laborious task of manually adding dozens of text boxes, there is also the problem of not knowing the exact amount i need until run time - so hence i figure it would be easier to code them out. I am more than happy to hear suggestions/alternatives to try and avoid the problem.

What my application is doing is taking an old fashined excel spreadsheet with plenty of user input and converting it to a polished program by putting a front end using VBA code. I figure i could write a routine that read the labels and input boxes that were on the excel spreadsheet (on 25 sheets) and put them onto a userform with multipage tabs to produce a polished program. Any suggestion for a workaround?