フォーム＆コントロールプロパティ活用辞典-076 HyperlinkAddress

Private Sub fraProperty_AfterUpdate()
'[プロパティの設定]オプショングループの更新後処理

  With Me!lblリンク
    Select Case Me!fraProperty
      Case 1
        'ハイパーリンク先にインターネット上のURLを指定
        .HyperlinkAddress = "http://www.tsware.jp/"
      Case 2
        'ハイパーリンク先にローカルのWord文書を指定
        .HyperlinkAddress = "C:\Documents and Settings\Administrator\" & _
                            "My Documents\Book1.xls"
    End Select
    'ラベルにリンク先を表示
    .Caption = .HyperlinkAddress
  End With

End Sub


#076		HyperlinkAddress
"HyperlinkAddress/ハイパーリンクアドレス" プロパティコントロールに対して、ハイパーリンク先のパスを設定します。パスとしては、インターネット上のアドレス（URL）や、ローカルPC上のパスまたはLAN上のファイルへのパス（UNC）などを指定することができます。ラベル、コマンドボタン、イメージ Private Sub fraProperty_AfterUpdate() '[プロパティの設定]オプショングループの更新後処理 With Me!lblリンク Select Case Me!fraProperty Case 1 'ハイパーリンク先にインターネット上のURLを指定 .HyperlinkAddress = "http://www.tsware.jp/" Case 2 'ハイパーリンク先にローカルのWord文書を指定 .HyperlinkAddress = "C:\Documents and Settings\Administrator\" & _ "My Documents\Book1.xls" End Select 'ラベルにリンク先を表示 .Caption = .HyperlinkAddress End With End Sub ハイパーリンク先にインターネット上のURLを指定した場合ハイパーリンク先にローカルのWord文書を指定した場合
\| Index \| Prev \| Next \|