Hyperlink.Address プロパティ (Visio)

ハイパーリンクがナビゲートする図形の ハイパーリンク オブジェクトのアドレスを取得または設定します。 値の取得と設定が可能です。

構文

アドレス

ハイパーリンク オブジェクトを表す変数。

戻り値

文字列

注釈

ハイパーリンク オブジェクトの Address プロパティを設定することは、[ハイパーリンク] ダイアログ ボックス ([挿入] メニュー) の [アドレス] ボックスに情報を入力することや、図形の [ハイパーリンク] の [アドレス] セルの結果を設定することと同じです。シェイプシート ウィンドウの name 行。

Address プロパティの値には、DOS、UNC、または URL パスを指定できます。たとえば、それぞれ "driveletter":\ "foldername" \ "drawingname"、\ "servername"\ "foldername"\ "drawingname"、https:// address などです。

Address プロパティが相対プロパティの場合 ("..\ "drawingname" の場合、HyperlinkBase プロパティ (指定されている場合) またはハイパーリンクのドキュメント パスに対して構成されます。 図面を保存しないと、ハイパーリンクは未定義になります。

Address プロパティが空の場合は、そのページを含む文書内のページを指していると想定できます。 この場合は、SubAddress プロパティに、ハイパーリンクの移動先となる図面ページの名前が格納されています。

この Microsoft Visual Basic for Applications (VBA) マクロは、Hyperlink オブジェクトの Address プロパティを設定しています。 この例を実行する前に、 address を有効なインターネットまたはイントラネットのアドレスに置き換えてください。

 
Public Sub Address_Example() 
 
 Dim vsoShape As Visio.Shape 
 Dim vsoHyperlink As Visio.Hyperlink 
 
 'Create a new shape to receive the hyperlink 
 Set vsoShape = ActivePage.DrawRectangle(1, 2, 2, 1) 
 Set vsoHyperlink = vsoShape.AddHyperlink 
 
 vsoHyperlink.Description = "Web site" 
 vsoHyperlink.Address = "https://address /" 
 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。