<em>Excel</em>里如何多次<em>重复执行</em>同一个宏

单纯的重复运行的话加个循环就知可以：
把你的宏代码Sub开头后加入：道
For Tims=1 to 100
End Sub语句前加入：
Next
即可以循环运行你的宏100次，但是这样单纯的循环往往会造成很大的内冗余和错误，特别是引用的数据。建议把你表格式的需求说出来，我愿容意花时间给你写。

你例子中知的代码道不是B1复制到C1啊.弄反了内.

Sub aaa()
for x=1 to 10 '将代码执行容10次.
Range("b1").Select
Selection.Copy
Range("c1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
next
End Sub

工具/原料

Excel2010   电脑   win10

方法/步骤zhidao

1、首先，打开需要编辑的Excel文档，选中A列，右击，点击【插入】---【列】。

2、显示如下效果。

3、如果想在D重复执行同一回个命令，即选中D列，键盘上按下F4。

4、即可在答D列重复上一次插入列的命令。

实现方式如下：

• 首先进入VBA编辑器（ALT+F11进入、或来者ALT+F8选宏再点编辑），

• 然后源再打开工程资源管理器（菜单查看下选中、或者直接按CTRL+R键），

• 在资源管理器里面的ThisWorkBook上双击鼠标，会打开工作的相关代码，

粘贴下面的例子代码：

Private Sub Workbook_open()    msgbox "工作表打开了"    'call 其它宏，或者继续写其它语zhidao句End Sub

这样每隔一段时间就会执行Workbook_open宏的代码。