Combobox List from Column, remove blanks

[SimondsJM]

Hello,

I am trying to populate my combobox1 from Column B starting at B7 and going down but there are blanks in between that I do not want to show up in the list. How can I remove the blanks?

 

[SimondsJM]

Well I have figured out the problem now.

The actual Worksheets name is "Vendor List" and this whole time I am thinking that it needed the Worksheets Properties (Name): Sheet2

Private Sub UserForm_Initialize()
    Dim c As Range
        With Worksheets("Vendor List")
        For Each c In .Range("B7:B12")
            If c.Value <> "" Then CBox1.AddItem c.Value
        Next c
    End With
End Sub

 

[Norie]

Goto Tools>Options... and on the General tab set Break On All Errors.

Now when you run the code and get the error the debugger should highlight the problem code.

By the way, you have checked the name of the worksheet?

Even something like errant spaces could cause the error you describe.