Compartilhar via

Objeto Watches (Excel)

  • Artigo

Uma coleção de todos os objetos Watch em um aplicativo especificado.

Exemplo

Use a propriedade Watches do objeto Application para retornar uma coleção Watches .

No exemplo a seguir, o Microsoft Excel cria um novo objeto Watch usando o método Add . Este exemplo cria uma fórmula de somatório na célula A3 e adiciona essa célula ao recurso de inspeção.

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

Você pode especificar a remoção de células individuais do recurso de inspeção usando o método Delete da coleção Watches. Este exemplo exclui a célula A3 na planilha 1 do livro 1 da janela Relógio. Este exemplo pressupõe que você tenha adicionado a célula A3 na planilha 1 do livro 1 (usando o exemplo anterior para adicionar um objeto Watch ).

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

Você também pode especificar para remover todas as células da janela Relógio usando o método Delete da coleção Watches . Este exemplo exclui todas as células da janela Relógio.

Sub DeleteAllWatches() 
 
 Application.Watches.Delete 
 
End Sub

Métodos

Propriedades

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.