Bonjour a vou deux et merci pour votre aide,
Alors macro ou vba je prends tout mais j'ai une préférence pour le VBA.
seniorpapou a écrit :
Bonjour,
avec hyperlink cela donne ceci:
Option Compare Database
Private Sub Commande0_Click()
CreateHyperlink Me!Commande0, "C:\.......\monfichier.eml", "C:\........\monfichier.eml"
End Sub
Sub CreateHyperlink(ctlSelected As Control, _
strSubAddress As String, Optional strAddress As String)
Dim hlk As Hyperlink
Set hlk = ctlSelected.Hyperlink
If Not IsMissing(strAddress) Then
hlk.Address = strAddress
Else
hlk.Address = ""
End If
hlk.SubAddress = strSubAddress
hlk.Follow
hlk.Address = ""
hlk.SubAddress = ""
End Sub
Cordialement
|
Bravo ça semble bien je connaissais pas trop l'hyperlink cependant je viens d'essayer et j'ai une erreur "Access ne peut suivre le lien hypertexte" en voyant ça je me suis dit que mon adresse devait être fausse mais apres vérif et ben non l'adresse et le nom du fichier sont bon donc je comprends pas!!
En faisant debogage access me renvoit sur la fonction Sub CreateHyperlink
et il me renvoie a ligne hlk.Follow pourtant j'ai regarder l'aide d'access et ta fonction est identique à celle de l'aide je ne trouve pas d'erreur
je vais continuer mes essais avec hyperlink, si vous avez des idées concernant cette foutu erreur je suis preneur.