Control.Hyperlink プロパティ (Access)

Hyperlink プロパティを使用すると、Hyperlink オブジェクトへの参照を返したり、コントロールのハイパーリンクのプロパティとメソッドにアクセスしたりすることができます。 読み取り専用です。

構文

式。ハイパーリンク

式コントロール オブジェクトを表す変数。

例

次の例の CreateHyperlink プロシージャでは、コマンド ボタン、ラベル、またはイメージ コントロールのハイパーリンク プロパティを、プロシージャに渡されるアドレス値とサブアドレス値に設定します。 現在のデータベース内のオブジェクトへのハイパーリンクではサブアドレス設定のみを使用するため、アドレス設定はオプションの引数です。

この例を試すには、2 つのテキスト ボックス コントロール (txtAddress と txtSubAddress) とコマンド ボタン (cmdFollowLink) を含むフォームを作成し、フォームのモジュールの宣言セクションに以下を貼り付けます。

Private Sub cmdFollowLink_Click() 
 CreateHyperlink Me!cmdFollowLink, Me!txtSubAddress, _ 
 Me!txtAddress 
End Sub 
 
Sub CreateHyperlink(ctlSelected As Control, _ 
 strSubAddress As String, Optional strAddress As String) 
 Dim hlk As Hyperlink 
 Select Case ctlSelected.ControlType 
 Case acLabel, acImage, acCommandButton 
 Set hlk = ctlSelected.Hyperlink 
 With hlk 
 If Not IsMissing(strAddress) Then 
 .Address = strAddress 
 Else 
 .Address = "" 
 End If 
 .SubAddress = strSubAddress 
 .Follow 
 .Address = "" 
 .SubAddress = "" 
 End With 
 Case Else 
 MsgBox "The control '" & ctlSelected.Name _ 
 & "' does not support hyperlinks." 
 End Select 
End Sub

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

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

  • Last updated on