April 20, 202300:11:44

EXCEL VBA USED CONTROLS TO DATA ENTREE CODE

'''''Lesson 58 Excel '''







Private Sub UserForm_Initialize()
SpinButton1.Max = Sheet1.Range("A1000").End(xlUp).Row + 1
SpinButton1.Min = 2
Dim i As Integer
For i = 1 To 4
Controls("Label" & i) = Sheet1.Cells(1, i)
Next i
End Sub