Create controls on form through VBA

[JJ]

I want to auto-create a form based on input in a table, so
I am looking for sample code showing:

- How to place a control on a form through VBA

 

[Frank Kabel]

Hi
as starting point:
http://j-walk.com/ss/excel/tips/tip76.htm

 

[Bob Phillips]

Here is an example based upon selecting from a checkbox

Private Sub CreateControl()
Dim newButton As msforms.Control
Select Case True
Case chkText.Value
Set newButton = Me.Controls.Add("Forms.Textbox.1")
newButton.Name = "New Textbox"
Case chkButton.Value
Set newButton = Me.Controls.Add("Forms.CommandButton.1")
newButton.Caption = "newCmd"
Case chkCheckbox.Value
Set newButton = Me.Controls.Add("Forms.Checkbox.1")
newButton.Caption = "Another Checkbox"
End Select

With newButton
.Left = 100
.Top = 50
.Visible = True
End With

End Sub


--

HTH

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