C
Cédrick
Guest
Bonjour à tous,
j'ai bien noté le code pour l'envoi de message via Excel:
"
Sub envoiMailEtQuelquesFeuilles()
Sheets(Array("feuil2", "Feuil3")).Copy ' créée une copie des feuilles cibles dans un nouveau classeur
ActiveWorkbook.SendMail Recipients:="LeForumXLD@net.fr" 'envoi Mail
Application.DisplayAlerts = False
ActiveWorkbook.Close ' supprime le classeur créé après l'envoi
Application.DisplayAlerts = True
End Sub
"
Est ce possible de compléter cet envoi :
1/ par un message en corps de texte
2/ que le message ne soit pas envoyé mais que Outlook l'ouvre et que ce soit l'utilisateur lui même qui clique sur Envoyer pour confirmer (dans outlook).
Merci d'avance
j'ai bien noté le code pour l'envoi de message via Excel:
"
Sub envoiMailEtQuelquesFeuilles()
Sheets(Array("feuil2", "Feuil3")).Copy ' créée une copie des feuilles cibles dans un nouveau classeur
ActiveWorkbook.SendMail Recipients:="LeForumXLD@net.fr" 'envoi Mail
Application.DisplayAlerts = False
ActiveWorkbook.Close ' supprime le classeur créé après l'envoi
Application.DisplayAlerts = True
End Sub
"
Est ce possible de compléter cet envoi :
1/ par un message en corps de texte
2/ que le message ne soit pas envoyé mais que Outlook l'ouvre et que ce soit l'utilisateur lui même qui clique sur Envoyer pour confirmer (dans outlook).
Merci d'avance