do while sheet 1 . row & lt；& gt""
Set finditem = sheet2.range (a: a)。查找(產品& amp產地)
發現箱數=箱數+1:噸位=噸位+1。
不能到達新建(產品& amp原產地名稱、原產地箱數、噸位)
產品及原產地名稱原產地集裝箱數量噸位
蘋果安徽蘋果安徽1 2
row=row +1
環