确定 Microsoft Visio 在超链接后面打开网页或其他 Visio 文档时是否在新位置打开窗口。 读/写。
语法
表达式。NewWindow
表达 一个代表 Hyperlink 对象的变量。
返回值
整数
备注
设置 Hyperlink 对象的 NewWindow 属性等效于设置形状的 Hyperlink. name 行中的 NewWindow 单元格。
当 NewWindow 设置为 False (0) 并且超链接的目标是将在浏览器中打开的网页或文档时,浏览器的位置和大小将与 Visio 窗口相同。 如果 NewWindow 为 True (非零) ,则浏览器窗口将显示在另一个位置 (,除非 Visio 文档已最大化) 。
如果超链接的目标是 Visio 文档,NewWindow 的值将确定链接的文档是在现有文档窗口上面的窗口中打开,还是在另一位置打开。
示例
以下示例绘制一个矩形形状,向该形状添加一个 Hyperlink 对象,设置该对象的 Address 和 NewWindow 属性,然后使用 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。