Banner

Friday, February 10, 2017

Combobox Additem From worksheet Dynamic Range Excell VBA





Combobox Fill Dynamic Range
Private Sub UserForm_Initialize()
Dim i As Long
For i = 1 To Sheet1.Range("A1000000").End(xlUp).Offset(1, 0).Row
Me.ComboBox1.AddItem Sheet1.Cells(i, 1).Value
Next i
End Sub
By on

No comments:

Post a Comment

Please do not enter any spam message in comment box

Subscribe to: Post Comments (Atom)