Объект Watches (Excel)
Коллекция всех объектов Watch в указанном приложении.
Используйте свойство Watches объекта Application , чтобы вернуть коллекцию Watches .
В следующем примере Microsoft Excel создает объект Watch с помощью метода Add . В этом примере создается формула суммирования в ячейке 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
Вы можете указать, чтобы удалить отдельные ячейки из средства отслеживания, используя метод Delete коллекции Watches . В этом примере удаляется ячейка A3 на листе 1 книги 1 из окна контрольных значений. В этом примере предполагается, что вы добавили ячейку A3 на листе 1 книги 1 (с помощью предыдущего примера для добавления объекта Watch ).
Sub DeleteAWatch()
Application.Watches(Workbooks("Book1").Sheets("Sheet1").Range("A3")).Delete
End Sub
Вы также можете указать, чтобы удалить все ячейки из окна контрольных значений с помощью метода Delete коллекции Watches . В этом примере удаляются все ячейки из окна контрольных значений.
Sub DeleteAllWatches()
Application.Watches.Delete
End Sub
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.