这个<em>excel</em>的重复执行的宏要用vb怎么写？-excel vb宏,vb打开ex

1.在sheet1的工作表名称标签上点击鼠标右键,选查看代来码,在弹出的VBA编辑窗口里粘贴源以下代码后,关闭VBA编辑窗口.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "DZ1" And Target.Value = "开" Then 开奖刷新
End Sub

2.在 开奖刷新 这个宏的循环语句里添zhidao加下面语句句
DoEvents
If Sheet1.Range("dz1").Value = "停" Then Exit Sub

Sub DateStamp()
r = [b65536].End(3).Row
[d3].Resize(r - 2) = Now
End Sub
你的百宏命令是指EXCEL里的宏吧，如果是这度样，你可以这样做，打开问EXCEL
在工具-宏-VB编辑器
在里面新建一个模块，在答模块里增加一回个过程
Public Sub auto_open()
这里面添加你要自动执行的答命令
end sub

如果是打开Excel文件就自动运行宏，那么，百可以在ThisWorkBook里面，在WorkBook_Open事件里面加入代码，这样启动Excel文件即可自动运行宏。或者在模块里面使用Auto_Open事件，也度可以自动运行宏。

如果是在知Excel使用过程中使用宏，就必须根据你的需要，选择合适的事件来触道发版宏代码。
比如，如果要A1单元格的值改变，就自动运行某个宏，那么就在Sheet_Change事件中，加入代码
If Target.Address = "$A$1" Then Call xx宏
如果是选取单元格变化触发某个宏，则用SHeet_SelectionChange事件。

所以，要自动运行某个宏，就必须明白你首先需要在什么时候触发宏，然后根据需要来选择相应的事件即权可！！