如何将第一页的表格在下面快速复制生成第二页、第三页一直到几百页（格式、行列的高宽完全相同）

2024年11月15日 03:01

有3个网友回答

网友（1）：

用vba吧，就是个拷贝复睁厅制即可，增加一层for循环。

制作了一个模拟的，戚扮供参考

代码如下：

Sub 插入高早灶()

Application.ScreenUpdating = False

Set Rng = [a1:c13]

For j = 1 To 5

Rng.Copy Cells(j * 15, 1)

Next j

Application.ScreenUpdating = True

End Sub

网友（2）：

有一个简单粗暴的方法：
选中1到18行，复制，然后在毕洞槐选择范围的下一行（第19行）粘帖；
选中37到72行，复制，然后颤嫌在选择范围的下一行（第73行）粘帖；
重复上述操手友作10次就超1000页了。
重复不到20次工作簿就满了。。。

网友（3）：

选中1到18行，整行复制到下边，格式就能带到下边。