Remove duplicates and sort array

Hi Richard,

Sorry I should have been more clear about the source of my array. It is a string converted into an array, actually two strings.

  ' Create arrays from strings
    Arr1 = Split(S1, " ")
    Arr2 = Split(S2, " ")

  ' Create one (common) array from the two arrays
    Arr3 = Split(Join(Arr1, "|") & "|" & Join(Arr2, "|"), "|")
    
  ' Remove duplicates from arrays
  '*
  '*
  '* Not coded yet
  '*
  '*
  '*

What I am doing is comparing the two strings for similarities but there is no reason to go through repeated words since they will either be found or not.

abousetta

Hi,

Does Chip Pearson's article http://www.cpearson.com/excel/distinctvalues.aspx help.

I'm sure what you want is in there somewhere.

Hello Ahmed,

I think a better approach would to be to use a Dictionary object. You can easily create a 1-D array of unique values. You could also do this with a Collection object. I prefer the Dictionary object as you can test if an element already exists without generating an error. If you need help coding this, let me know.