View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
John John is offline
external usenet poster
 
Posts: 2,069
Default ADD LISTBOX, COMBOBOX, LABEL IN THE SAME USERFORM

must confess never added a control on the fly before but had a quick play &
managed to get following to work. Maybe give you some ideas to develop
further.

Private Sub CommandButton1_Click()
Dim MyPage As MSforms.Page
Dim MyListBox As MSforms.ListBox


Set MyPage = MultiPage1.Pages(0)

Set MyListBox = MyPage.Controls.Add("Forms.ListBox.1")

With MyListBox

.Top = 10
.Left = 20
.Height = 50

End With

End Sub
--
jb


"Eddie_SP" wrote:

In a multipage control, after clicking on a button, can I add a Listbox (or
any other object) without closing this multipage?


Example:

If Me.CommandButton1.Value = True Then
Listbox.Add
With Listbox
Width = X
Height = Y
Top = YY
Left = RR
End With


So... Is that possible?