Global.ActivePage-Eigenschaft (Visio)
Gibt das aktive Page-Objekt zurück. Schreibgeschützt.
Syntax
Ausdruck. ActivePage
Ausdruck Eine Variable, die ein Global-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
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.