Set d=createobject("scripting.dictionary") arr=range("a2:c" & cells(rows.count,1).end(3).row).value Brr=sheet2.range(跟上面一样) For I=1 to ubound(arr) d(arr(I,1) & arr(I,3))=I Next For k=1 to ubound(brr) If d.exists(brr(k,1) & brr(k,2)) then Range("j" & I+1).value=d(brr(k,1) & brr(k,2)) 大概是这意思吧,我也是初学者,不对的话咱俩在研究