EXCEL中如何按照指定次数重复内容
工作中，有时候，我们需要一些内容重复多次，而且不同的内容重复次数不一，这样手工一个复制，实在不是什么好的办法，今天我们就来学习一种非常快速的方法，分分钟完成大量的工作。具体请看动画效果。
步骤1：准备数据
A列就是我们要重复的内容，B列就是相应的次数，我们首先这样把数据准备好，不管内容多少代码会自动判定。代码通用。
步骤2：进入VBE界面
右击工作表标签，选择查看代码（快捷键ALT F11），都可以进入。
步骤3：插入模块
进入VBE界面后，右击ThisWorkbook，选择插入-模块。
步骤4：输入代码
插入模块后，双击模块，进入代码编辑区域，输入以下代码：
```excel
Sub 按指定次数重复内容()
'代码由yianxss原创，转载请注明
Dim i As Long, arr(1 To 100000, 1 To 1)
'A列内容行数
i Cells(, 1).End(3).Row
'按次数重复
For k 2 To i
For n 1 To Cells(k, 2)
arr(m 1, 1) Cells(k, 1)
m m 1
Next
Next
'[d2]存放的开始地址，可修改
[d2].Resize(m, 1) arr
End Sub
```
步骤5：关闭VBE编辑器
代码OK后，右上角叉，关闭VBE编辑器，返回工作表。
步骤6：添加按钮
点击开发工具选项卡-控件，选择按钮控件，在工作表的空白区域，鼠标拖动，画出一个大小合适的按钮，并右击制定宏。
步骤7：选择宏并确定
选择“按指定次数重复内容”，然后点击确定按钮，返回工作表。
步骤8：查看效果
最后，我们点击按钮，看一下效果吧，已经按照要求生成了，D列就是我们要的效果了。小伙伴们，你们学会了吗？
版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。
