Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Eine Auflistung aller Watch-Objekte in einer angegebenen Anwendung.
Beispiel
Verwenden Sie die Watches-Eigenschaft des Application-Objekts , um eine Watches-Auflistung zurückzugeben.
Im folgenden Beispiel erstellt Microsoft Excel mithilfe der Add-Methode ein neues Watch-Objekt. In diesem Beispiel wird eine Summenformel in Zelle A3 erstellt und diese Zelle dann zum Überwachungsfenster hinzugefügt.
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
Sie können angeben, dass einzelne Zellen aus der Überwachungseinrichtung entfernt werden sollen, indem Sie die Delete-Methode der Watches-Auflistung verwenden. In diesem Beispiel wird Zelle A3 in Arbeitsblatt 1 von Buch 1 aus dem Überwachungsfenster gelöscht. In diesem Beispiel wird davon ausgegangen, dass Sie die Zelle A3 in Blatt 1 von Buch 1 hinzugefügt haben (indem Sie das vorherige Beispiel verwendet haben, um ein Überwachungsobjekt hinzuzufügen).
Sub DeleteAWatch()
Application.Watches(Workbooks("Book1").Sheets("Sheet1").Range("A3")).Delete
End Sub
Sie können auch angeben, dass alle Zellen aus dem Überwachungsfenster entfernt werden sollen, indem Sie die Delete-Methode der Watch-Auflistung verwenden. In diesem Beispiel werden alle Zellen aus dem Überwachungsfenster gelöscht.
Sub DeleteAllWatches()
Application.Watches.Delete
End Sub
Methoden
Eigenschaften
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.