![](https://images.gutefrage.net/media/default/user/8_nmmslarge.png?v=1551279448000)
![](https://images.gutefrage.net/media/default/user/14_nmmslarge.png?v=1551279448000)
Antwort
Schreib im Userform folgendes:
(in Excel2007/ 2010 getestet)
Private Sub UserForm_Initialize()
Dim i As Byte
Dim currentName As String
For i = 1 To 10
'8 = H
currentName = Cells(i, 8).Value
UserForm1.Controls("TextBox" & CStr(i)).Text = currentName
Next
End Sub