envoi lien du formulaire en fonction des noms par outlook

Forum Microsoft Office Word

Modérateur : Argitxu

envoi lien du formulaire en fonction des noms par outlook

Publicité
 

Avatar du membre
supercopain
Posteur débutant
Posteur débutant
Messages : 1
Enregistré le : 12 nov. 2019, 12:25

envoi lien du formulaire en fonction des noms par outlook

Message non lu par supercopain » 12 nov. 2019, 14:29

Bonjour,

J'ai créé un formulaire modèle avec Microsoft Office 365ProPlus

Avec la macro ci-dessous j'enregistre le formulaire dans un répertoire commun du réseau (ça fonctionne)
Ce formulaire doit être validé par 3 personnes (dont le nom est indiqué dans des "Zone d'édition" (contrôle de formulaire)

Je souhaiterais que ma macro enregistre (ça c'est bon) ET qu'elle envoi un mail au 3 personnes (avec nom variable) indiqué dans le formulaire, ce mail devrait contenir un lien qui pointe sur ce formulaire (et non pas de pièce jointe)

J'espère que vous m'avez compris :-)
MERCi


Private Sub CommandButton1_Click()
' Macro qui compose un nom de document en accolant "aaaammjjhhmmss" et en ajoutant l'extension .docm. Personnaliser "Nom_" et voir l'extension d'un doc avec macro sous Word 2004.
Jour = Mid(Date, 1, 2)
Mois = Mid(Date, 4, 2)
Année = Mid(Date, 7, 4)
Heure = Mid(Time, 1, 2)
Minutes = Mid(Time, 4, 2)
Secondes = Mid(Time, 7, 2)

nomdoc = "Demande n°" & Année & "_" & Mois & "_" & Jour & "_" & Heure & Minutes & Secondes & ".docx"

ChangeFileOpenDirectory "Chemin de mon répertoire"
ActiveDocument.SaveAs FileName:=nomdoc

CommandButton1.Select 'supprime le bouton après enregistrement
Selection.Delete

ActiveDocument.Close SaveChanges:=wdSaveChanges
Application.Quit

End Sub

Répondre