S
Steve
HI all,
Am using the code below to operate a combobox, but would like it to
read the information from the top line of the worksheet, currently is
reading down
Any help with this would be appreciated,
Private Sub userform_Activate()
Dim iLastRow As Long
Dim i As Long
With Worksheets("Work Data")
iLastRow = .Cells(.Rows.Count, "1").End(xlUp).Row
Me.ComboBox1.Clear
For i = E To iLastRow
Me.ComboBox1.AddItem .Cells(i, "1").Value
Next i
End With
End Sub
HYCH
Steve
Am using the code below to operate a combobox, but would like it to
read the information from the top line of the worksheet, currently is
reading down
Any help with this would be appreciated,
Private Sub userform_Activate()
Dim iLastRow As Long
Dim i As Long
With Worksheets("Work Data")
iLastRow = .Cells(.Rows.Count, "1").End(xlUp).Row
Me.ComboBox1.Clear
For i = E To iLastRow
Me.ComboBox1.AddItem .Cells(i, "1").Value
Next i
End With
End Sub
HYCH
Steve