If all textbox are "Textbox1 , Textbox2" and so on try...

Private Sub UserForm_Initialize()
Dim x As Integer
With Me
    For x = 1 To 18
        .Controls("Textbox" & x).Enabled = True
    Next x
End With
End Sub