Помогите, пожалуйста, решить следующую проблему.  
Дано:  
столбец из n кол-ва строк, где много повторяющихся значений, необходимо отобрать уникальные значения из этого множества и записать их в массив. Похоже на "Удалить дубликаты" в Excel 2007, но реализовать надо в VBA  
 
Пробовал реализовать это следующим образом:  
 
 
Dim MasUniqueZnach()  
 
tec = 2 ' строка, с которой начинаются необходимые значения  
cntZnach = 0  
 
While Not Range("a" + CStr(tec)) = Empty  
     
   Naim = Range("a" + CStr(tec))  
     
   For x = 0 To cntZnach  
     
       If MasGroup(x) = Naim Then  
           Exit For  
           Else  
              ReDim Preserve MasZnach(x)  
              MasZnach(x) = Naim  
              cntZnach = cntZnach + 1  
       End If  
     
   Next x  
         
tec = tec + 1  
Wend  
 
Не вышло, хотя когда-то уже сталкивался с подобной задачей, писал похожий код.