Propriété Hyperlink.NewWindow (Visio)

Détermine si Microsoft Visio ouvre une fenêtre dans un nouvel emplacement lorsqu’il suit un lien hypertexte pour ouvrir une page web ou un autre document Visio. Lecture-écriture.

Syntaxe

expression. NewWindow

Expression Variable qui représente un objet Hyperlink .

Valeur renvoyée

Entier

Remarques

Définir la propriété NewWindow d'un objet Hyperlink revient à définir la cellule NewWindow dans la ligne Hyperlink. nom de la forme.

Lorsque NewWindow est défini sur False (0) et que la cible du lien hypertexte est une page web ou un document qui s’ouvre dans un navigateur, le navigateur se trouve dans la même position et de la même taille que la fenêtre Visio. Si NewWindow a la valeur True (non zéro), une fenêtre de navigateur s’affiche à un autre emplacement (sauf si le document Visio est agrandi).

Lorsque la cible du lien hypertexte est un document Visio, la valeur de NewWindow détermine si le document lié s'ouvre dans une fenêtre au-dessus de la fenêtre de document existante ou dans un autre emplacement.

Exemple

L'exemple suivant dessine une forme de rectangle, ajoute un objet Hyperlink à la forme, définit ses propriétés Address et NewWindow, puis utilise la méthode Follow pour accéder au lien hypertexte. Pour mieux observer l'effet de cette propriété, avant d'exécuter cette macro, redimensionnez et positionnez la fenêtre du document Visio afin qu'elle ne soit pas totalement agrandie.

 
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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.