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 のサポートおよびフィードバックを参照してください。