Hyperlink.NewWindow 属性 (Visio)

确定 Microsoft Visio 在超链接后面打开网页或其他 Visio 文档时是否在新位置打开窗口。 读/写。

语法

表达式NewWindow

表达 一个代表 Hyperlink 对象的变量。

返回值

整数

备注

设置 Hyperlink 对象的 NewWindow 属性等效于设置形状的 Hyperlink. name 行中的 NewWindow 单元格。

NewWindow 设置为 False (0) 并且超链接的目标是将在浏览器中打开的网页或文档时,浏览器的位置和大小将与 Visio 窗口相同。 如果 NewWindowTrue (非零) ,则浏览器窗口将显示在另一个位置 (,除非 Visio 文档已最大化) 。

如果超链接的目标是 Visio 文档,NewWindow 的值将确定链接的文档是在现有文档窗口上面的窗口中打开,还是在另一位置打开。

示例

以下示例绘制一个矩形形状,向该形状添加一个 Hyperlink 对象,设置该对象的 AddressNewWindow 属性,然后使用 Follow 方法定位到此超链接。 为了更好地观察此属性具有的效果,请在运行此宏之前调整 Visio 文档窗口的大小并对其进行定位,以便它不处于完全最大化的位置。

 
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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。