怎么用代码限制时间？

fasdafa

在本工作簿操作，如果每天9点-10点就退出程序，否则执行宏1
Sub 宏1()
   msgbox "你好"
end Sub
怎么用代码实现这种效果？

suye1010

1. Sub test()
   
2. If Timer > 32400 And Timer < 36000 Then Exit Sub
   
3. End Sub

复制代码

返回表示自午夜以来已过的秒数的 Single。语法
Timer
备注
在 Microsoft Windows 中，Timer 函数返回秒的小数部分

fasdafa

suye1010 发表于 2013-11-2 10:22
返回表示自午夜以来已过的秒数的 Single。语法
Timer
备注

32400这数字怎么算出来的？

shaokui123