population list box without repeating information

See one method at John Walkenbach's site:

http://www.j-walk.com/ss/excel/tips/tip47.htm
Filling a ListBox With Unique Items
--
Regards,
Tom Ogilvy

"medicenpringles"
<[email protected]> wrote in
message news:[email protected]...
>
> ok, so i used the code below to fill a list box:
>
>
> Code:
> --------------------
> Private Sub UserForm_Initialize()
>
> Dim oIngredient As Ingredient
> Dim oIngredients As New Ingredients
> Dim avIngredients() As Variant
> Dim i As Integer
>
> For i = 1 To oIngredients.Count
> Set oIngredient = oIngredients.Item(i)
> avIngredients(i) = oIngredient.IngredientType
> If oIngredient.Type = previoustype Then ' need something here
> GoTo Skip
> Else
> Me.lstPreDefinedTypes.AddItem (CStr(oIngredient.IngredientType))
> End If
> Skip:
> Next i
>
> End Sub
> --------------------
>
>
> well, not exactly; the "oIngredient.Type = previoustype" needs to be
> replaced with something that will look through the array being filled
> and return true if it finds a duplicate.
> is there a way to do this?
>
> thanks ahead of time,
> sven
>
>
> --
> medicenpringles
>
>
> ------------------------------------------------------------------------
> medicenpringles's Profile:
http://www.excelforum.com/member.php...o&userid=16458
> View this thread: http://www.excelforum.com/showthread...hreadid=478659
>