Objet watches (Excel)

Collection de tous les objets Watch d’une application spécifiée.

Exemple

Utilisez la propriété Watches de l’objet Application pour retourner une collection Watch .

Dans l’exemple suivant, Microsoft Excel crée un objet Watch à l’aide de la méthode Add . Cet exemple montre comment créer une formule de somme dans la cellule A3, puis comment ajouter cette cellule à la fonctionnalité d'observation.

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

Vous pouvez supprimer des cellules individuelles de la fonctionnalité d'observation en utilisant la méthode Delete de la collection Watches. Cet exemple supprime la cellule A3 de la feuille de calcul 1 du livre 1 à partir de la fenêtre Espion. Cet exemple suppose que vous avez ajouté la cellule A3 sur la feuille 1 du livre 1 (en utilisant l’exemple précédent pour ajouter un objet Watch ).

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

Vous pouvez également spécifier la suppression de toutes les cellules de la fenêtre Espion à l’aide de la méthode Supprimer de la collection Espions . Cet exemple supprime toutes les cellules de la fenêtre Espion.

Sub DeleteAllWatches() 
 
 Application.Watches.Delete 
 
End Sub

Méthodes

Propriétés

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

  • Last updated on