Dim MyTextBoxName as String
Dim MyTextBoxObject as Control
 
For i= 1 to 10
  MyTextBoxName = "myTxtBox" & CStr(i)
  With MyUserform
  Set MyTextBoxObject = .SearchByName(MyTextBoxName) 'das stimmt eben nicht! 
  ' gibt es eine vordefinierte Funktion um das zu machen???
  End With
  MyTextBoxObject.Text = i
Next i