Question

excel求助：帮忙写个循环的宏语句

本人想把sheet1的内容复制到sheet2到sheet20，大概就是这个意思，本人菜鸟，没时间学习，谁能帮个忙，看看这个循环语句怎么写啊谢谢

Answer 1

不用VBA，用公式，假设SHEET2复制SHEET1的A列，A1公式：

=sheet1!A1
下拉；
同样方法复制粘贴其它工作表。
（这样，当SHEET1中数据变化时，可以自动更新其它工作表的内容）

Answer 2

晕。干吗非要用宏啊？如果是相同内容的话，直接复制sheet1的内容，然后选择sheet2~sheet20工作表，粘贴即可。

Answer 3

Sub main()
For i = 1 To 20
Worksheets("Sheet1").Copy After:=Worksheets("Sheet1")
Next
End Sub