Using this simple For Loop we can easily clear the values from all textboxes in a userform.
Private Sub CommandButton1_Click()
Dim Clr as control
For Each Clr In Me.Controls
If TyepName(Clr) = "TextBox" Then
Clr.Value = ""
End If
Next
End Sub()