Klasse Watches (Excel VBA)

Eine Auflistung aller Watch -Objekte in einer angegebenen Anwendung. Um eine Watches -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim wtcs as Watches
Set wtcs = Application.Watches

For Each

Hier ist ein Beispiel für die Verarbeitung der Watches -Elemente in einer Sammlung

Dim wtcWatche As Watch
For Each wtcWatche In Application.Watches
	
Next wtcWatche

Add

Fügt einen Bereich hinzu, der nachverfolgt wird, wenn das Arbeitsblatt neu berechnet wird.

Add (Source)

Source: Die Quelle für den Bereich.

 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

Count

Gibt einen Long-Wert zurück, der die Anzahl der Objekte in der Auflistung darstellt.

Dim lngCount As Long
lngCount = Application.Watches.Count

Delete

Löscht das Objekt.

Application.Watches.Delete

Item

Gibt ein einzelnes Objekt aus einer Auflistung zurück.

Item (Index)

Index: Der Name oder die Indexnummer des Objekts.

Dim wtcItem As Watch
Set wtcItem = Application.Watches(Index:=1)