2.代碼如下:
子數據比較()
尺寸rng為範圍,rng1為範圍
對於範圍內的每個RNG([b1],[b 1])。End(xlDown))
對於範圍內的每個RNG 1([e1],[e 1])。End(xlDown))
如果rng1 = rng,則
rng1(1,2) = rng(1,2)
如果…就會結束
然後
末端接頭
3、如圖所示