Discussion :

[Celia1303]

Bonjour !

J'aimerai savoir si il éxiste une fonction tel que

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
appexcel.Cells(i, 8) = Format(Rst_cot2[Date1_Cotisations], "dd/mm/yyyy")

pour formater un lien hypertexte.

En effet, mon export vers un modèle de document excel ne se fait pas correctement.
Voici ce qui s'affiche :

a.leborgne@sibjet.fr#mailto:a.leborgne@sibjet.fr#

Je ne vois pas comment réglé ce problème,
si vous avez une idée...

Merci !

[Arkham46]

Salut,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

appexcel.Hyperlinks.Add appexcel.Cells(i, 8),HyperlinkPart(Rst_cot2[HyperLien], acAddress)

Bye

[Celia1303]

Merci beaucoup pour ton aide.

J'ai du changé un parametre de la fonction pour que le lien s'affiche correctement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
appexcel.Cells(i, 8) = HyperlinkPart(Rst_Adherents_CA![Email_Ent], acDisplayedValue)

Sans ton aide j'y serai jamais arrivé,merci beaucoup !