Excel VBA教程:OnTime方法

安排一个过程在将来的特定时间运行(既可以是具体指定的某个时间,也可以是指定的一段时间之后)。

expression.OnTime(EarliestTime, Procedure, LatestTime, Schedule)

expression   必需。该表达式返回一个 Application对象。

EarliestTime   Variant 类型,必需。设置过程开始运行的时间。

Procedure   String 类型,必需。设置要运行的过程名。

LatestTime   Variant 类型,可选。过程开始运行的最晚时间。例如,LatestTime参数设为 EarliestTime + 30,当时间到了 EarliestTime 时,如果由于其他程序处于运行状态 Microsoft Excel 不处于“就绪”、“复制”、“剪切”或“查找”模式,则 Microsoft Excel 将等待 30 秒让第一个过程先结束运行。如果 30 秒内 Microsoft Excel 不能回到“就绪”模式,则不运行此过程。如果省略该参数,Microsoft Excel 将一直等待到可以运行该过程为止。

Schedule   Variant 类型,可选。如果该值为 True,则安排一个新的 OnTime 过程。如果该值为 False,则清除先前设置的过程。默认值为 True。

说明

使用Now + TimeValue(time) 可安排经过一段时间(从现在开始计时)之后运行某个过程。使用TimeValue(time) 可安排某个过程只运行指定的时间。

Excel VBA教程:OnTime方法·示例

本示例设置 15 秒后运行 my_Procedure 过程,从现在开始计时。


Application.OnTime Now + TimeValue("00:00:15"), "my_Procedure"

本示例设置 my_Procedure 在下午 5 点开始运行。


Application.OnTime TimeValue("17:00:00"), "my_Procedure"

本示例撤消前一个示例对 OnTime 的设置。


Application.OnTime EarliestTime:=TimeValue("17:00:00"), _
    Procedure:="my_Procedure", Schedule:=False

上页:Excel VBA教程:OnRepeat方法 下页:Excel VBA教程:OnUndo方法

Excel VBA教程:OnTime方法

Excel VBA教程:OnUndo方法 Excel VBA教程:Open方法
Excel VBA教程:OpenDatabase方法 Excel VBA教程:OpenLinks方法
Excel VBA教程:OpenText方法 Excel VBA教程:OpenXML方法
Excel VBA教程:Parse方法 Excel VBA教程:Paste方法
Excel VBA教程:PasteSpecial方法 Excel VBA教程:Patterned方法
Excel VBA教程:PickUp方法 Excel VBA教程:PieGroups方法
Excel VBA教程:PivotCache方法 Excel VBA教程:PivotCaches方法
Excel VBA教程:PivotFields方法 Excel VBA教程:PivotItems方法
Excel VBA教程:PivotSelect方法 Excel VBA教程:PivotTables方法
Excel VBA教程:PivotTableWizard方法 Excel VBA教程:Play方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号