Application.ActivePage-Eigenschaft (Visio)
Gibt das aktive Page-Objekt zurück. Schreibgeschützt.
Syntax
Ausdruck. ActivePage
expression Eine Variable, die ein Application-Objekt darstellt.
Rückgabewert
Seite
Hinweise
Die ActivePage-Eigenschaft gibt nur dann ein Page-Objekt zurück, wenn im aktiven Fenster ein Zeichenblatt angezeigt wird. Andernfalls wird Nothing zurückgegeben. Um zu überprüfen, ob eine Seite aktiv ist, verwenden Sie den Is-Operator , um die ActivePage-Eigenschaft mit Nothing zu vergleichen.
Es ist möglich, das aktive Fenster ohne Qualifikation aus dem globalen Microsoft Visio-Objekt abzurufen, das automatisch für VBA-Code verfügbar ist, der Teil des VBA-Projekts eines Visio-Dokuments ist. Sie können diesen Code z. B. folgendermaßen verwenden:
Set vsoPage = ActivePage
Wenn Ihre Visual Studio-Lösung die Referenz Microsoft.Office.Interop.Visio enthält, wird diese Eigenschaft den folgenden Typen zugeordnet:
- Microsoft.Office.Interop.Visio.IVApplication.ActivePage
Beispiel
Dieses VBA-Makro (Microsoft Visual Basic for Applications) zeigt, wie Sie die aktive Seite ohne Qualifikation aus dem globalen Visio-Objekt abrufen, das automatisch für VBA-Code verfügbar ist, der Teil des VBA-Projekts eines Visio-Dokuments ist.
Public Sub ActivePage_Example()
Dim vsoPage As Page
'Find out if a page exists, and if it does, get the page.
If Not(ActivePage Is Nothing) Then
Set vsoPage = ActivePage
Debug.Print vsoPage.Name
Else
Debug.Print "No active page."
End If
End Sub
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.