Guten Morgen,
ich lasse eine Listbox erstellen mit nachfolgendem Code.
Wie heißt dann die Listbox?
Wenn ich Listbox1 eingebe findet das Makro diese nicht.
Danke!
Gruß Chrissi
Dim ii, X As Long
Dim ObLst As MSForms.ListBox
Dim UF As UserForm1
On Error Resume Next
Set UF = UserForm1
For ii = 1 To 1
Set ObLst = UF.FRM_U2.Controls.Add("Forms.Listbox.1", "ObLst", True)
With ObLst
.Width = 690
.Height = 300
.Top = 2
.Left = 5
.ColumnCount = 9
.ColumnWidths = "49,95 Pt;80 Pt;80 Pt;80 Pt;49,95 Pt;80 Pt;80 Pt;80 Pt;1 Pt"
End With
Next ii