Hallo Zusammen,
ich erzeuge in einer Userform per:
With Me.BListe.Controls.Add("Forms.CheckBox.1")
.Left = PLeft
.Top = PTop
.Width = 135
.Height = 18.75
.Name = "MA_" & i
End With
'Variable setzen
MA_B = "MA_" & i
'Bezeichnung einsetzen
Controls(MA_B).Caption = "Mitarbeiter " & i
Controls(MA_B).Font.Name = "Verdana"
Controls(MA_B).Font.Size = 10
'Controls(MA_B).Enabled = False
Me.Controls(MA_B).Caption = PLBT.Cells(i, 3).Value & " - " & PLBT.Cells(i, 5).Value
Auswahlboxen.
Dies funktioniert auch.
Wie bekomme ich es nun hin diese während der Laufzeit (geöffneter Userform) wieder zu löschen.
Mit Clear und Delete will es irgendwie nicht gehen
Dim mn AS Control
For Each mn In Me.Controls
If mn.Name Like "MA_*" Then Me.Controls(mn.Name).Clear
Next mn
Danke Euch im Voraus.
MFG
Steffen Schmerler