Creando formulario programáticamente en el módulo usando vba

Quiero crear un formulario de usuario en el módulo mediante VBA mediante programación. Soy un novato e inexperto, así que he intentado algunos ejemplos, pero no están cumpliendo con mis requisitos.

Solo quiero macro que

crea un formulario de usuario dentro de un módulo usando VBAtiene un ListBox con algunos datostiene un CommandButton con un oyente

Aquí está el código que utilicé

Option Explicit

Sub MakeuserForm()
'Dim CommandButton1 As MsForms.CommandBarButton
'Dim ListBox1 As MsForms.ListBox
Dim UserForm1 As VBComponent

Set UserForm1 = ActiveWorkbook.VBProject.VBComponents.Add(vbext_ct_MSForm)
With UserForm1
.Properties("Height") = 100
.Properties("Width") = 200
On Error Resume Next
.Name = "My Form"
.Properties("Caption") = "This is your user form"
End With
ShowForm
End Sub

Sub ShowForm() 
NewForm.Show 
End Sub 

Ahora no sé cómo agregar ListBox y el botón al formulario con un oyente.

Respuestas a la pregunta(1)

Su respuesta a la pregunta