Share via


Hyperlink.NewWindow-Eigenschaft (Visio)

Bestimmt, ob Microsoft Visio ein Fenster an einem neuen Speicherort öffnet, wenn es auf einen Link folgt, um eine Webseite oder ein anderes Visio-Dokument zu öffnen. Lese-/Schreibzugriff.

Syntax

Ausdruck. Newwindow

Ausdruck Eine Variable, die ein Hyperlink-Objekt darstellt.

Rückgabewert

Ganze Zahl

HinwBemerkungeneise

Das Festlegen der NewWindow-Eigenschaft eines Hyperlink-Objekts entspricht dem Festlegen der NewWindow-Zelle im Hyperlink des Shapes. name row.

Wenn NewWindow auf False (0) festgelegt ist und das Ziel des Links eine Webseite oder ein Dokument ist, die in einem Browser geöffnet wird, befindet sich der Browser an der gleichen Position und der gleichen Größe wie das Visio-Fenster. Wenn NewWindowauf True (ungleich Null) festgelegt ist, wird ein Browserfenster an einer anderen Stelle angezeigt (es sei denn, das Visio-Dokument ist maximiert).

Wenn das Ziel des Hyperlinks ein Visio-Dokument ist, bestimmt der Wert von NewWindow ob das verknüpfte Dokument in einem Fenster oben im vorhandenen Dokument geöffnet wird, oder an einer anderen Position.

Beispiel

Im folgenden Beispiel wird ein rechteckiges Shape gezeichnet, dem Shape wird ein Hyperlink-Objekt hinzugefügt, die Address- und NewWindow-Eigenschaften werden festgelegt und anschließend wird mithilfe der Follow-Methode zum Hyperlink navigiert. Zum besseren Beobachten der Wirkung dieser Eigenschaft, bestimmen Sie die Größe und Position des Visio-Dokumentfensters vor dem Ausführen des Makros, sodass es sich nicht in vollständig maximierter Position befindet.

 
Public Sub NewWindow_Example() 
 
 Dim vsoHyperlink As Visio.Hyperlink 
 
 Set vsoHyperlink = ActivePage.DrawRectangle(0,0,5,5).AddHyperlink 
 
 vsoHyperlink.Address = "https://www.microsoft.com/" 
 vsoHyperlink.NewWindow = True 
 vsoHyperlink.Follow 
 
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.