Question

excel VBA 写一段代码 内容是 把sheet9中的前50行复制到sheet1中最后一行

Answer 1

dim r1 as integer ,r2 integer dim c as integer r2=sheet1.range("A65536").end(xlup).row for r1 =1 to 50for c=1 to sheet1.range("a1").end(xlright).columnsheet1.cells(r1+r2,c) = sheet9.cells(r1,c)nextnext你也可以用剪切板。

Answer 2

最好的办法是你启动录制宏，然后自己操作一遍，结束录制宏。然后你打开录制好的宏脚本就是你要的VBA代码。