Excel créer lien hypertexte dans mail outlook [Résolu/Fermé]

Signaler
Messages postés
3
Date d'inscription
samedi 14 janvier 2012
Statut
Membre
Dernière intervention
15 janvier 2012
-
 PeaceBee -
Bonjour à tous et bonne année,

Petit problème....et je suis à la recherche de suggestion

Je suis dans une feuille excel, avec un morceau de code qui crée automatiquement un corps de mail, jusque là pas de souci,
Dans le corps du mail j'inscris le chemin d'accès de mon fichier excel, toujours pas de problème.
Le souci c'est qu'il apparaît comme une simple chaîne de caractère, alors que je souhaiterais le faire apparaître comme un lien hypertexte dans le mail

des idées ...

Merci


3 réponses

Messages postés
3
Date d'inscription
samedi 14 janvier 2012
Statut
Membre
Dernière intervention
15 janvier 2012
1
hou là, pas beaucoup de candidat.....
Messages postés
3
Date d'inscription
samedi 14 janvier 2012
Statut
Membre
Dernière intervention
15 janvier 2012
1
Re...... bon merci quand même

J'ai trouvé un moyen qui fonctionne , il suffit en fait de construire le lien pointant vers le fichier et de le précéder par file://

on a alors .body = "file://" & nom_fichier

une fois le mail constitué dans outlook, on retrouve la chaîne sous forme de lien hypertexte.

remarque: j'ai été obligé de remplacer les " " du chemin d'accès par %20 car sinon on a bien un lien hypertexte, mais qui est erroné puisque tronqué
Messages postés
2
Date d'inscription
lundi 3 septembre 2012
Statut
Membre
Dernière intervention
24 avril 2013

Bonjour,
Je dois encore me tromper, cela ne fonctionne pas chez moi:
mail.body = "file://" & nom_fichier --> tronqué dès qu'il y a un space dans l'adresse
mail.body = %20file://%20 & nom_fichier --> syntaxe incorrecte

merci par avance
Messages postés
2
Date d'inscription
lundi 3 septembre 2012
Statut
Membre
Dernière intervention
24 avril 2013

Je viens de me remettre la dessus, la syntaxe exacte fonctionnant est:
... Chr(13) + "Pour info le fichier X est là: " + "\\blablabla\blabla1\blabla%20bla2\blabla%20bla3\YYYYY%20YYY%20YYY.pdf" + ". chaine de texte qqc" + Chr(13) + ...

avec Chr(13) = saut de ligne
"blabla" = chaine de texte
"\\...." = lien du fichier vers votre ordi ou serveur
%20 = écriture d'un espace dans une chaine de caractère qui puorra faire office de lien hypertexte en VBA.
Olà, pour compléter la discussion et en finir avec les espaces:
Path = adresse à ouvrir type " Dossier Partage\User\...." (avec des espaces)
.body = "file:\\" & Replace(Path, " ", "%20")

ça pète pas fort mais ça clos le sujet!
Bon VBA a tous
Salut,

Chez moi ça a fonctionné :

J'avais le chemin d'accès dans Outlook (.Body = "\\XXX..."), mais il n'était pas reconnu en tant que lien.
J'ai rajouté :
"file:" & "\\XXX.."
et c'est bon.