Excel宏

问题：请问哪个大神
两个EXCEL表格A、B，都包含相同内容的列a（比如姓名），如何在A表中筛选出a列跟B表a列相同内容的行。
宏也行，函数也行？

答：
Dim lie1 As Integer
Dim lie2 As Integer

lie1 = 7 '此处填写列1的长度
lie2 = 3 '此处填写列2的长度

Dim i As Integer
Dim j As Integer
Dim str1 As String
Dim str2 As String
For i = lie1 To 1 Step -1
Sheets("Sheet1").Select '此处双引号内为表1的名称
str1 = Range("A" & i).Text '此处填写列1所在的列
Sheets("Sheet2").Select '此处双引号内为表2的名称
For j = lie2 To 1 Step -1
str2 = Range("A" & j).Text '此处填写列2所在的列
If str1 = str2 Then
Sheets("Sheet1").Select '此处填写列1所在的列
Range("A" & i).FormulaR1C1 = "" '此处填写列1所在的列
Exit For
End If
Next
Next