EXCEL的自动筛选的宏代码，如何使用

想实现输入数据跟表格中另一列的数据自动对比筛选，把重复的存放在另一列中，
例如：
A B C
55 62 62
62 81 81
23 33
81
A列中的数据固定，在B列中输入数据，在C列中自动生成A列和B列中重复的数据！希望各位高手作答的时候讲清楚怎么使用，谢谢！

在你数据当前的左下角sheet 鼠标右键 点击最后一个 查看代码  把下面的代码复制到里面

使用的时候 03版是 菜单 工具----宏---宏---找到test的宏执行 即可

Sub test()

 Application.ScreenUpdating = False

Dim rng As Range

Dim r1, i As Long

Dim findvalue As Range

r1 = ActiveSheet.Range("B65536").End(xlUp).Row

i = 1

For Each rng In ActiveSheet.Range("B1:B" & r1)

    Set findvalue = ActiveSheet.Columns(1).Find(what:=rng.Value)

    If Not findvalue Is Nothing Then

       Cells(i, 3).Value = rng.Value

       i = i + 1

    End If

Next

 Application.ScreenUpdating = True

End Sub