Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Not ALL values are populating to Combobox for some reason. Why ?
I am trying to set the Selection(row"E") of a Listbox value(by clicking it) to Populate the Combobox
with Values that are in the Same Row("BH") Private Sub ListBox1_Click() Application.ScreenUpdating = False If ComboBox1.ListCount 0 Then ComboBox1.Clear Dim LastCell As Long Dim myrow As Long Dim nodupes As Collection On Error Resume Next LastCell = Worksheets("Data").Cells(Rows.Count, "BH").End(xlUp).Row With ActiveWorkbook.Worksheets("Data") ..Select Set nodupes = New Collection For myrow = 1 To LastCell If .Cells(myrow, 5).Value = ListBox1.Value Then If .Cells(myrow, 60) < "" Then nodupes.Add .Cells(myrow, 60).Value, CStr(.Cells(myrow, 60).Value) If Err.Number = 0 Then ComboBox1.AddItem Cells(myrow, 60) ' I am not getting ALL values listed End If End If End If Next End With Application.ScreenUpdating = True End Sub But i ONLY seem to get 1 or 2 values, wher ther are more than that. Not sure why? Corey |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Populating a ComboBox in a UserForm | Excel Programming | |||
ComboBox populating problem | Excel Programming | |||
Populating a ComboBox | Excel Programming | |||
Populating Combobox Methods | Excel Programming | |||
populating a combobox on a worksheet | Excel Programming |