InvisibleApp. ActiveWindow-Eigenschaft (Visio)InvisibleApp.ActiveWindow property (Visio)

Gibt das aktive Window -Objekt zurück.Returns the active Window object. Schreibgeschützt.Read-only.

SyntaxSyntax

Ausdruck. ActiveWindowexpression.ActiveWindow

Ausdruck Eine Variable, die ein InvisibleApp -Objekt darstellt.expression A variable that represents an InvisibleApp object.

RückgabewertReturn value

FensterWindow

BemerkungenRemarks

Das aktive Fenster kann einen der folgenden Fenstertypen aufweisen: Zeichnung, Schablone, ShapeSheet, Symbolbild bearbeiten oder ein durch ein Add-On erstelltes Zeichnungs- oder Schablonenfenster.The active window can be one of the following window types: Drawing, Stencil, ShapeSheet, Edit Icon, or a Drawing or Stencil window created by an add-on. Beim aktiven Anwendungsfenster muss es sich um ein MDI-Frame-Fenster handeln, es darf kein unverankertes oder verankertes Fenster sein.The application's active window can only be an MDI frame window—it cannot be one of the floating, docked, or anchored windows. Eine vollständige Liste der Fenstertypen finden Sie unter der Type -Eigenschaft.For a complete list of window types, see the Type property.

Wenn ein Fenster in einer Instanz von Microsoft Visio nicht aktiviert ist, gibt die ActiveWindow-Eigenschaft den Wert Nothing zurück.If a window in an instance of Microsoft Visio is not active, the ActiveWindow property returns Nothing.

BeispielExample

Das folgende VBA-Makro (Microsoft Visual Basic for Applications) zeigt, wie das aktive Fenster ohne Qualifikation aus dem globalen Visio-Objekt abgerufen wird, das automatisch für VBA-Code verfügbar ist, der Teil des VBA-Projekts eines Visio-Dokuments ist.The following Microsoft Visual Basic for Applications (VBA) macro shows how to get the active window without qualification from the Visio global object, which is automatically available to VBA code that is part of the VBA project of a Visio document.

 
Public Sub ActiveWindow_Example() 
 
 Dim vsoWindow As Visio.Window 
 
 'Get the active window. 
 Set vsoWindow = ActiveWindow 
 
 'To verify that we got the active window, print its caption. 
 Debug.Print vsoWindow.Caption 
 
End Sub

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.