vb语言实现两个excel表格内容的互换

求大神。用VB语句把B截图中这几个数值对应到A截图的D列的6,7,8,9行中。或者介绍一下语句和方法。

---

假设A截图为SHEET1表，B截图为sheet2表
用段巧 与语句
for i= 6 to 9
sheets("sheet1").cells(i,4)=sheets("弯芹sheet2").cells(i,2)
next i
即可
也可以用RANGE语握闹键句一次赋值完成

---