Bonsoir 3Stone

je cherche à intégrer une adresse email dans un doc word qui soit activable.

j'utilise le code suivant pour insérer des données de ma base access vers Word via des signets.

pour le texte cela fonctionne

je pensai utiliser la fonction hyperlink.add mais je ne trouve pas la solution pour ancrer ma donnée au signet de word (texte surligné),

connais-tu la solution?

d'avance merci

cordialement

code utilisé:

Private Sub BcAperçuAvImprim_Click()
    Set appword = New Word.Application
    Set Feuille = appword.Documents.Open("D:\Fichier.docx")
   
    'rempli les signets du bordereau d'envoi
    appword.Selection.GoTo wdGoToBookmark, Name:="Destin_Nom": appword.Selection.TypeText (Me.ZtNom)

    appword.ActiveDocument.Hyperlinks.add Anchor:=Selection.Range, Address:="mailto:melanie.guelet@poste-immo.fr", SubAddress:="", ScreenTip:="", TextToDisplay:="mailto:melanie.guelet@poste-immo.fr"
   
    appword.ActiveDocument.SaveAs FileName:=""D:\Fichier.docx""
    appword.Visible = True
end sub

Bonjour 3Stone

meilleurs voeux pour cette nouvelle année 2014,

j'ai inscrit ma demande sur ton site car le code VB est saisie sous Access. J'évite de créer des macros dans mes fichiers word et préfèrent les gérer depuis Access. Malheureusement un copier-coller d'une macro word dans Access ne suffit pas pour atteindre le résultat recherché d'où ma demande.

je te remercie pour ta réponse et lis avec attention les pages que tu me proposes

cordialement

Nico

ah, ok

je comprend

je recherche donc car il doit y avoir une solution

merci pour tes réponses

cordialement

Nico