excel中怎么用vb把表1中A1到A30的内容赋值到表2的对应单元格？

Question

如题所述

Answer 1

sheets("表1").range("A1:A30").copy sheets("表2").[a1]

Answer 2

sub sdgsd
for i = 1 to 30
sheet2.cells(i,1)=sheet1.cells(i,1)
next
end sub