Bonjour,
Cela fait quelques heures que je cherche désespérément à ajouter un lien hypertext qui pointe vers un répertoire partagé, dans un mail généré en VBA.
Quelqu'un peut-il m'aider ?
Sub notification()
Dim destinataire, sujet, cc As String
sujet = "test"
body = "<a href='" & "S:\REPERTOIRE-COMMUN\ECHANGE" & "'>ici</a>"
strcommand = "C:\Program Files (x86)\Mozilla Thunderbird\thunderbird.exe"
strcommand = strcommand & " -compose " & "to='" & destinataire & "'"
strcommand = strcommand & "," & "subject=" & sujet & ","
strcommand = strcommand & "body='" & Chr(34) & body & Chr(34) & "'"
strcommand = strcommand & "," & "cc=" & cc
Call Shell(strcommand, vbNormalFocus)
Quand je reçois le mail, le lien est bien actif mais lorsque je clique dessus windows me demande avec quelle application je veux l'ouvrir.
Un grand merci par avance !!
PP