Propriedade Image.Hyperlink (Access)
Use a propriedade Hyperlink para retornar uma referência a um objeto Hyperlink e acessar as propriedades e os métodos do hiperlink de um controle. Somente leitura.
Sintaxe
expressão. Hiperlink
Expressão Uma variável que representa um objeto Image .
Exemplo
O procedimento CreateHyperlink no exemplo a seguir define as propriedades do hiperlink para um botão de comando, rótulo ou controle de imagem para os valores de endereço e subaddress passados para o procedimento. A configuração de endereço é um argumento opcional, pois um hiperlink para um objeto no banco de dados atual usa apenas a configuração de subaddress.
Para experimentar este exemplo, crie um formulário com dois controles de caixa de texto (txtAddress e txtSubAddress) e um botão de comando (cmdFollowLink) e cole o seguinte na seção Declarações do módulo do formulário.
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
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.