To mozes da uradis preko macroa.
Code:
Private Sub Remove_Duplicates_Click()
Columns("A:A").Select
Selection.Copy
Range("D1").Select
ActiveSheet.Paste
Application.CutCopyMode = False
ActiveSheet.Range("D:D").RemoveDuplicates Columns:=1, Header:=xlNo
End Sub