I為整數，j為整數
Arr1 =工作表（“文件”）。range（“a 1:d“&；紙張（“文件”）。單元格（行。數數，“壹個”）。結束（xlup）。排）
Arr2 =工作表（“查找”）。range（“a 1:d“&；床單（“尋找”）。單元格（行。數數，“壹個”）。結束（xlup）。排）
對於i = 1至下界（arr2）
對於j = 1至下界（arr1）
如果arr 2（A，1）= arr 1（A 1）並且arr 2（B，2）= arr 1（B，2），則
arr 2（iD 4）= arr 1（D，4）
轉到100
如果…就會結束
然後
arr 2（D，4）=““
100:
然後
床單（“尋找”）。range（“a 1:d“&；床單（“尋找”）。單元格（行。數數，“d”）。結束（xlup）。row = arr 2。
末端接頭