暗淡?db(0?去哪?2),x,I,arr,id,nm
掃描數據
設置?db(0)= createobject(" scripting . dictionary ")
為了什麽?每個?x?在?數組(1,2)
設置?db(x)= createobject(" scripting . dictionary ")
arr =張數(x)。使用範圍
為了什麽?i=1?去哪?欠奉
id=trim(arr(i,1))
nm=trim(arr(i,2)
db(x)(id)=nm
Db(0)(id)=true '總字典
下壹個?我
下壹個?x
產生差異
aorkbooks.add
活動工作表。單元格(1,1)。Resize (1,4) = array ("ID "," Name 1 "," Name 2 "," Comparison ")。
i=2
為了什麽?每個?id?在?db(0)。鍵
單元格(I,1)=id
如果?db(1)。存在(id)?然後呢?cells(i,2)=db(1)(id)
如果?db(2)。存在(id)?然後呢?單元格(I,3)=db(2)(id)
細胞(I,4) = IIF(細胞(I,2) =細胞(I,3),“相同”,“不同”)
i=i+1
下壹個?身份證明(identification)