Hallo,
ich krieg so langsam die Krise....
Ich möchte von VBA gesteuert Labelfelder in ein bestehendes Userform ("DataCrossTable") einfügen. Der Code läuft ohne Fehlermeldungen durch, jedoch enthält das angezeigte Form nicht die neuen Elemente.
Dim newlabel As Control
Load DataCrossTable
For CL = 1 To FinalColumnDest
labname = "DesLabel" & CL
Set newlabel = DataCrossTable.Controls.Add("Forms.Label.1", labname, Visible)
newlabel.Left = 18
newlabel.Top = 36 + CL * 24
newlabel.Width = 175
newlabel.Height = 20
newlabel.Caption = Destination.Cells(3, CL).Text
Next CL
'Show Form
DataCrossTable.Show
Kann mir jemand sagen, wo mein Fehler steckt?
Danke im voraus
Nicolaus