Excel VBA教程:Watches集合

   
Application
Watches
Watch

指定应用程序中所有Watch对象的集合。

Watches集合用法

使用 Application对象的 Watches属性可返回一个 Watches集合。

在下面的示例中,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

上页:Excel VBA教程:Watch对象 下页:Excel VBA教程:WebOptions对象

Excel VBA教程:Watches集合

Excel VBA教程:WebOptions对象 Excel VBA教程:Window对象
Excel VBA教程:Windows集合对象 Excel VBA教程:Workbook对象
Excel VBA教程:Workbooks集合 Excel VBA教程:Worksheet对象
Excel VBA教程:WorksheetFunction对象 Excel VBA教程:Worksheets集合
Excel VBA教程:Accent属性 Excel VBA教程:AcceptLabelsInFormulas属性
Excel VBA教程:ActiveCell属性 Excel VBA教程:ActiveChart属性
Excel VBA教程:ActivePane属性 Excel VBA教程:ActivePrinter属性
Excel VBA教程:ActiveSheet属性 Excel VBA教程:ActiveWindow属性
Excel VBA教程:ActiveWorkbook属性 Excel VBA教程:AddIndent属性
Excel VBA教程:AddIns属性 Excel VBA教程:Address属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号