Freigeben über


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.