Creating Userform Controls on Frame

  • Thread starter Thread starter David Myle
  • Start date Start date
D

David Myle

Hi all,

How can I create "on the fly" other controls on a Frame, if the frame itself
is to be created on the fly. The following code (simplified to create a
CheckBox on a Frame) failed.

Private Sub Userform_Initialize()
Dim x as Control, y as Control
Set x = Me.Controls.Add("Forms.Frame1.1")
Set y = Me..Frame1.Controls.Add("Forms.CheckBox1.1")
End Sub

The code balks at "Frame1" with "Method or data member not found" error
message. Apparently, the code fails to detect the Frame purported to have
been created earlier.

Any help will be appreciated.
 
The code you purport to partially work appears to have errors. Anyway, this
worked for me:

Private Sub Userform_Initialize()
Dim x As Control, y As Control
Set x = Me.Controls.Add("Forms.Frame.1", Name:="Frame1")
Set y = x.Controls.Add("Forms.CheckBox.1", Name:="Chkbx1")
End Sub
 
Many thanks Tom.

DM


Tom Ogilvy said:
The code you purport to partially work appears to have errors. Anyway, this
worked for me:

Private Sub Userform_Initialize()
Dim x As Control, y As Control
Set x = Me.Controls.Add("Forms.Frame.1", Name:="Frame1")
Set y = x.Controls.Add("Forms.CheckBox.1", Name:="Chkbx1")
End Sub
Click to expand...
 
Back
Top