Watch 对象

         
Watches
Watch

代表在重新计算工作表时跟踪的区域。Watch 对象允许用户验证其模型的准确性并调试其遇到的问题。Watch 对象是 Watches 集合中的成员。

Watch 对象用法

使用 Add 方法或 Watches集合的 Item 属性可返回一个 Watch 对象。

在下面的示例中,Microsoft Excel 采用 Add 方法创建一个新的 Watch 对象。本示例在单元格 A3 中创建一个求和公式,然后将该单元格作为监视对象添加到监视功能中。

Sub AddWatch()

    With Application
        .Range("A1").Formula = 1
        .Range("A2").Formula = 2
        .Range("A3").Formula = "=Sum(A1:A2)"
        .Range("A3").Select
        .Watches.Add Source:=ActiveCell
    End With

End Sub

通过采用 Watches 集合的 Delete 方法,可以从监视功能中指定删除单个单元格。本示例从 watch 窗口中删除工作簿 1 的工作表 1 上的单元格 A3。本示例假定已在工作簿 1 的工作表 1 上添加了单元格 A3(采用前一个示例可添加 Watch 对象)。

Sub DeleteAWatch()

    Application.Watches(Workbooks("Book1").Sheets("Sheet1").Range("A3")).Delete

End Sub

通过采用 Watches 集合的 Delete 方法,还可指定从“监视窗口”中删除所有的单元格。本示例从“监视窗口”中删除所有的单元格。

Sub DeleteAllWatches()

    Application.Watches.Delete

End Sub