• Home
 · 
• Miscellaneous
 · 
• A-1 Bye-Bye ListBox Duplicates

A-1 Bye-Bye ListBox Duplicates

For Beginners. Get rid of unwanted listbox duplicates in a few very simple lines of code.

Rate A-1 Bye-Bye ListBox Duplicates

• 1
• 2
• 3
• 4
• 5

(6(6 Vote))

Dim j As Integer
 j = 0
  
Do While j < List1.ListCount
 
 List1.Text = List1.List(j)
  
 If List1.ListIndex <> j Then
  List1.RemoveItem j
 Else
  j = j + 1
 End If
  
Loop
  
End Sub