Sub loadMenu()
menu.Show
End Sub
Sub Main()
Dim menu as new UserForm1
~~code
Call LoadMenu(menu)
~~code
End Sub
Sub Main()
Dim menu as UserForm1
~~code
Set menu = New UserForm1
menu.show
~~code
End Sub
Sub Main()
Dim menu as New UserForm1
~~code
menu.show
~~code
End Sub
Dim menuName as String
MenuName = "Userform1"
Userforms.Add(MenuName).Show
Dim menuName As String
Dim newUF As Object
menuName = "Userform1"
Set newUF = UserForms.Add(menuName)
newUF.TextBox1.Text = "Hello"
newUF.Show