Objeto Watches (Excel)

Colección de todos los objetos Watch de una aplicación especificada.

Ejemplo:

Use la propiedad Watches del objeto Application para devolver una colección Watches .

En el ejemplo siguiente, Microsoft Excel crea un nuevo objeto Watch mediante el método Add . En este ejemplo se crea una fórmula de sumatorio en la celda A3 y, a continuación, se agrega esta celda a la función de inspección.

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

Para especificar la eliminación de celdas individuales de la función de inspección, use el método Delete de la colección Watches. En este ejemplo se elimina la celda A3 de la hoja de cálculo 1 del libro 1 de la ventana Inspección. En este ejemplo se supone que ha agregado la celda A3 en la hoja 1 del libro 1 (mediante el ejemplo anterior para agregar un objeto Watch ).

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

También puede especificar para quitar todas las celdas de la ventana Inspección mediante el método Delete de la colección Watches . En este ejemplo se eliminan todas las celdas de la ventana Inspección.

Sub DeleteAllWatches() 
 
 Application.Watches.Delete 
 
End Sub

Métodos

• Add
• Delete

Propiedades

• Aplicación
• Count
• Creator
• Elemento
• Parent

Vea también

• Referencia del modelo de objetos de Excel

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.