Envoyer par mail un formulaire au format PDF ?
Bonjour,
Quelqu'un pourrait m'aider?
J'aurais besoin d'envoyer un formulaire par mail en format PDF.
J'ai trouvé ça sur le net : http://fr.viadeo.com/fr/groups/detai...02h0jqt7mmyved
Mais étant débutant en VBA, je ne sais pas comment modifier ce bout de code?
Code:
1
2
3
4
5
6
7
8
9
10
11
12
| Private Sub Enregistrer_Click()
Dim MonOutlook As Object
Dim MonMessage As Object
Set MonOutlook = CreateObject("Outlook.Application")
Set MonMessage = MonOutlook.createitem(0)
MonMessage.To = DLookup("[mail]", "[salariés]", "n°salarie=" & Form![acheteur])
MonMessage.Subject = "Commande à valider"
MonMessage.body = "Bonjour, merci de bien vouloir valider ou non cette commande"
MonMessage.send
Set MonOutlook = Nothing
End Sub |
Je vous remercie d'avance :)
Nicolas
