子宏1()
dim arr1，arr2，i & ampj & amp，n & amp
arr 1 =張(1)。使用範圍
arr2 =工作表(2)。使用範圍
對於i=1至ubound(arr1)
對於j=1至ubound(arr2)
如果arr1(i，1)=arr2(j，1)且arr1(i，2)=arr2(j，2)，則
n=n+1
為...退出
如果…就會結束
下壹個j
接下來我
消息框n
末端接頭