Ouvetrture fichier avec condition

[Antoine]

Voici une macro qui envoie un mail avec un link du fichier dans le corps du mail.
Celui-ci est enclenché à l´aide d´un bouton X situé ds un fichier Y

Code:
Sub envoiMessageLienFichier()
Dim oOutlook As New Outlook.Application
Dim oMessage As Outlook.MailItem

Set oMessage = oOutlook.CreateItem(olMailItem)

With oMessage
.Subject = 'le sujet du message'
.Body = 'bonjour , ' & vbLf & 'Ci joint le lien vers le fichier ' & vbLf & _
'file://' & Application.Substitute(ThisWorkbook.FullName, ' ', '%20')
.Display
End With
End Sub

Est-il possible que le link te mène à la feuille Y du fichier ou se trouve le bouton X iniciant la macro...?

 

[TYPX]

ma réponse est à prendre avec moultes pincettes mais si ton link pointe vers la feuille y et qu'il y a un bouton pour enclencher ta macro
je ne vois pas ou est le problème

cordialement typx