Objeto Watch (Excel)
Representa um intervalo que é rastreado quando a planilha é recalculada. O objeto Watch permite que os usuários verifiquem a precisão de seus modelos e os problemas de depuração encontrados.
O objeto Watch é membro da coleção Watches.
Use o método Add ou a propriedade Item da coleção Watches para retornar um objeto Watch .
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 para remover células individuais da instalação do relógio 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
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.