VBA Filter a combobox range

[Bevee]

Hi,

How can you filter a combobox range?
I made a registersystem for my sportsclub , i made it that behind the names of the people appear the bill they have to pay
I have a combobox , and the range of it is a range of cells in a sheet.
now i want that if the bill = 0 the name won't appear in the combobox

Thank you

 

[My Aswer Is This]

With such minimal details you can try this:

Assuming your names are in column "A" of your sheet
And assuming the amount they owe is in column "B"
And assuming your ComboBox is named ComboBox1
You can put this script in a command button:

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Dim i As Long
Dim Lastrow As Long
ComboBox1.Clear
Lastrow = Cells(Rows.Count, "A").End(xlUp).Row
    For i = 1 To Lastrow
        If Cells(i, 2) > 0 Then ComboBox1.AddItem Cells(i, 1).Value
    Next
Application.ScreenUpdating = False
End Sub