这只是极小一部分，每天有很多号码要比对出来，小弟被迫接镖，日日加班，夜夜泪崩。。。
跪求大神vba编程相助!!度我与苦海，，，
sheet1
sheet2
sheet1里黄色部分比对sheet2里黄色部分
sheet2算是个号码库了，
sheet1里的电话号码不存在sheet2里的，
在sheet3里面显示，包括这个电话号码在原有的sheet1里手机品牌等整行信息都显示在sheet3里。。

非得用宏吗？
是数据量大还是怎么？countif判断存不存在，不存在就引用，后面的用查找函数引用过去不就行了？

select * from [Sheet1$] where not f6 in (select f2 from [Sheet2$])
未测试差不多吧
http://www.baidu.com/s?wd=vba+adodb+sql&ie=UTF-8

写个程序很容易，但还是需要花些时间的。

很简单

给个附件，不然怎么测试

sheet3里面写公式=IF(COUNTIF(Sheet2!$B:$B,Sheet1!$F1)=0,Sheet1!A1,"")右拉下拉
这样就可以把不存在的都引出来了~~~

没必要用vba

vba字典

用vlookup吧
没表没法测试，基本是=vlookup(f$1,*sheet2!$B$1:$E$15,2,0)，这句是吧，sheet2里有号码的C列内容写出来，同样的公式，替换2为3，4,5

给个附件才写。写程序容易，输入数据难。

Sub chazhao()
Dim i, j, k, found As Integer
k = 1
For i = 1 To Sheets(1).UsedRange.Rows.Count
found = 0
For j = 1 To Sheets(2).UsedRange.Rows.Count
If Sheets(2).Cells(j, 2) = Sheets(1).Cells(i, 6) Then
found = 1
Exit For
End If
Next j
If found = 0 Then
Sheets(1).Rows(i).Copy Sheets(3).Cells(k, 1)
k = k + 1
End If
Next i
End Sub

感觉没必要用vba