Combobox werkt niet goed op ander tabblad

[snb]

Als je de lijst vult in de gebeurtenis Userform_Initialize heb je er vervolgens geen omkijken naar, in welk werkblad je je ook bevindt.

Omdat je een combobox gebruikt (waarin de gebruiker iets kan doen) is het beter .rowsource niet te gebruiken;

Dus bijv.

Private Sub Userform_initialize()
    with Sheets("Debiteuren")
       ComboBox1.List = .Range("A2:A" & .Cells(Rows.Count, 1).End(xlUp).row).Value
    end with
End Sub

of bijv.

Private Sub Userform_initialize()
    with Sheets("Debiteuren")
       ComboBox1.List = .cells(2,1).resize(.Cells(Rows.Count, 1).End(xlUp).row-1).Value
    end with
End Sub