A
Aviashn
Private Sub UserForm_Initialize()
Dim ctrl As Control
Dim x As Integer
x = 1
With UserForm1.Frame1
For Each ctrl In UserForm1.Frame1.Controls
ctrl.Value = x
x = x + 1
Next ctrl
End With
End Sub
Dim ctrl As Control
Dim x As Integer
x = 1
With UserForm1.Frame1
For Each ctrl In UserForm1.Frame1.Controls
ctrl.Value = x
x = x + 1
Next ctrl
End With
End Sub