Propriété Image.Hyperlink (Access)
Utilisez la propriété Hyperlink pour renvoyer une référence à un objet Hyperlink et accéder aux propriétés et méthodes du lien hypertexte d’un contrôle. En lecture seule.
Syntaxe
expression. Lien hypertexte
Expression Variable qui représente un objet Image .
Exemple
La procédure CreateHyperlink de l’exemple suivant définit les propriétés de lien hypertexte d’un bouton de commande, d’une étiquette ou d’un contrôle d’image sur les valeurs d’adresse et de sous-adresse passées à la procédure. Le paramètre d’adresse est un argument facultatif, car un lien hypertexte vers un objet dans la base de données active utilise uniquement le paramètre de sous-adresse.
Pour essayer cet exemple, créez un formulaire avec deux contrôles de zone de texte (txtAddress et txtSubAddress) et un bouton de commande (cmdFollowLink), puis collez ce qui suit dans la section Déclarations du module du formulaire.
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
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.