EXCEL如何实现动态筛选不重复记录复制到新列中

Question

EXCEL如何实现动态筛选不重复记录复制到新列中
求一函数公式：工作表中有几千条记录，希望从中查找中不重复的记录复制到新列中，即无论某一记录有一条或多条（当在“现状”列中加两笔相同的F，“结果”列中则只Show出一个F，A、B、C、D、F），我只需要一条。如：
现状 结果
A A
A B
B C
C D
C
C
D

Answer 1

这玩意用公式好像完成不了吧？
用vba：

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 1 Then
        Columns("A:A").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range("B1"), Unique:=True
    End If
End Sub