Formular programmgesteuert im Modul mit vba erstellen
Ich möchte ein Benutzerformular im Modul mit VBA programmgesteuert erstellen. Ich bin ein Neuling und unerfahren, daher habe ich einige Beispiele ausprobiert, aber sie erfüllen nicht meine Anforderungen.
Ich will nur das Makro
Erstellt mit VBA ein Benutzerformular innerhalb eines Modulshat eine ListBox mit einigen Datenhat einen CommandButton mit einem ListenerHier ist der Code, den ich verwendet habe
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
Jetzt weiß ich nicht, wie ich ListBox und Button mit einem Listener zum Formular hinzufügen kann.