Listbox with duplicates only.

[haai]

I Have 2 columns (A and B)
Column A = the ID (unique) number, colum B has duplicate values .
I want to populate a userform listbox with the duplicates only.
The values that only appear once in column B should NOT be in de Listbox.
LIke this:
Col A Col B
1 Cheese
15 Cheese
8 Bread
29 Bread
..........

 

[haai]

Small example

 

[Marc L]

No ListBox in your attachment … ​

​

Anyway you can use a helper column with a COUNTIF formula for example …​

​

 

[haai]

No ListBox in your attachment

Oops,forgot.

 

[Marc L]

Unclear : result with columns headers or without ?​

​

 

[haai]

I never use row source, without headers.

 

[Marc L]

User Forms & Controls in VBA » Chandoo.org - Learn Excel, Power BI & Charting Online

User Forms & Controls in VBA User forms are custom user interface screens that you can develop in VBA to interact with your users. An example user form is shown below. Learn how to use various form controls & user form features in this section. In this page What are Form Controls? Using Excel...

chandoo.org

Belleke,​

according to this link, to Excel basics like any beginner operating manually and to the Macro Recorder​

as a VBA beginner starter to paste to the UserForm code module :​

Private Sub UserForm_Initialize()
    With Blad1.[A1].CurrentRegion
              .Range("K2").Formula = "=COUNTIF(" & .Columns(2).Address & ",B2)>1"
              .AdvancedFilter xlFilterCopy, .Range("K1:K2"), .Range("M1:N1")
         With .Range("M1").CurrentRegion.Rows
           If .Count > 1 Then ListBox1.List = .Item("2:" & .Count).Value2
         End With
    End With
End Sub

Do you like it ? So thanks to click on bottom right Like !​

​

 

[haai]

Thank you Marc, this solves my problem, I can adjust it to my needs.
Perfect solution.