Controlls löschen
RainerK
habe eine UserForm, mit welcher ich durch Auswahl einer ComboBox aus verschiedenen Tabellenblättern dynamische Button's erstelle.
Damit bei einer Wiederholung die ComboBoxen gelöscht werden habe ich folgenden Code integriert:
For n = 12 To 150 ' Anzahl der Spalten, die durchsucht werden
s = Trim(ThisWorkbook.Worksheets(lSheet).Cells(5, n).Value)
t = ""
t = Me.Controls("CHK" & n & "_" & Trim(s)).Name
Worksheets("Start").Cells(1, n) = ""
Me.Controls.Remove (t)
Next n
Muss ich den Code nun noch je für die OB und TB duplizieren oder gibt es eine Möglichkeit alle Controlls mit einem Code anzusprechen?
Die Controlls werden in einer MultiPage erstellt. Vielleicht gibt es auch einen Befehl, die Multipage zu löschen.
Habe hier leider nur
MultiPage1.Pages.Remove (MultiPage1.Pages.Count - 1)
MultiPage1.Pages.Add
gefunden. Das funktioniert jedoch nicht.
Gruß RainerK
Anzeige