ich möchte mich erstmal bei Geist bedanken.
Ich möchte nun gern noch wissen, ob es entsprechend (Controls("Label" & a).Visible = True) möglich ist, variable TextBox zu füllen.
zeile = 1
For zahl = 1 To 5
zeile = zeile + 1
Controls("UserForm1.TextBox" & zahl) = "Zeile" & zeile
Next zahl
Danke im Vorraus