Hyperlink.NewWindow プロパティ (Visio)
ハイパーリンクに従って Web ページまたは別の Visio ドキュメントを開くときに、新しい場所にウィンドウを開くかどうかを指定します。 値の取得と設定が可能です。
構文
式。Newwindow
式Hyperlink オブジェクトを表す変数。
戻り値
整数
注釈
Hyperlink オブジェクトの NewWindow プロパティを設定するのは、図形の [Hyperlink. name] 行に [NewWindow] セルを設定するのと同じことです。
NewWindow が False (0) に設定されていて、ハイパーリンクのターゲットがブラウザーで開く Web ページまたはドキュメントである場合、ブラウザーは Visio ウィンドウと同じ位置と同じサイズになります。 NewWindow が True (ゼロ以外) の場合、ブラウザー ウィンドウは別の場所に表示されます (Visio ドキュメントが最大化されていない限り)。
ハイパーリンクのターゲットが Visio 図面の場合、NewWindow の値によって、リンクされた図面を既存の図面ウィンドウの上部のウィンドウで開くか、別の場所で開くかを指定します。
例
この Microsoft Visual Basic for Applications (VBA) マクロは、図形に 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 のサポートおよびフィードバックを参照してください。
フィードバック
https://aka.ms/ContentUserFeedback」を参照してください。
以下は間もなく提供いたします。2024 年を通じて、コンテンツのフィードバック メカニズムとして GitHub の issue を段階的に廃止し、新しいフィードバック システムに置き換えます。 詳細については、「フィードバックの送信と表示