I'm trying to feed my list1 with unique value from column 1 of my MSHflexgrid2 but nothing update with this list.
Would you know why?
I'm trying to see but i'm getting out of idea.
Thanks again for your help
'Fill listbox with unique values from first column in flexgrid Dim xlObject As Excel.ApplicationDim xlWB As Excel.WorkbookDim NoOfRows As LongDim NoOfColumns As Long Dim vArray As Variant Dim lngRow As Long Dim lngCol As Long Dim dicUnique As New Scripting.Dictionary Dim vItem As Variant Me.List1.Clear For lngRow = 1 To NoOfRows vItem = MSHFlexGrid2.TextMatrix(lngRow, 1) If dicUnique.Exists(vItem) Then Else dicUnique.Add vItem, 1 List1.AddItem vItem End If Next dicUnique.RemoveAll Set dicUnique = Nothing
Experts Exchange is the only place where you can interact directly with leading experts in the technology field. Become a member today and access the collective knowledge of thousands of technology experts.