一段有用的excel 宏命令

PS : 转载的， 仅供参考

Sub Copy_Auto()
Dim i
For i = 1 To 10
    Range(Cells(1, 2), Cells(10, 2)).Copy Range(Cells(10 * i + 1, 2), Cells(10 * i + 10, 2))
Next
End Sub

上述代码的意思就是： 
把第1行第2列到第10行第2列的数据，往下拷贝10次！

——————— 
版权声明：本文为CSDN博主「路漫远吾求索」的原创文章，遵循CC 4.0 by-sa版权协议，转载请附上原文出处链接及本声明。
原文链接：https://blog.csdn.net/starstar1992/article/details/80550110