Mit Hilfe einer kleinen Schleife k�nnen Sie alle Steuerelemente
in einer Userform ermitteln.
In diesem Beispiel wird der Name ermittelt:

Sub Steuerelemente()
    Dim Objekt As Control
    For Each Objekt In UserForm1.Controls
       MsgBox Objekt.Name
    Next Objekt
End Sub

Ein Anwendungsfall k�nnte beispielsweise das "Leeren" aller Texboxes sein.
Dabei ist nat�rlich der Name der Textbox entscheidend,
in diesem Fall wird ein vorangestelltes "Textbox" erwartet:

Sub Textboxes_leeren()
    Dim Objekt As Control
    For Each Objekt In UserForm1.Controls
       If Left(UCase(Objekt.Name), 7) = "TEXTBOX" _
          Then Objekt.Value = ""
    Next Objekt
End Sub