Macro vba pour ouverture nouveau message/mail dans outlook 2010 prêt à l'envoi

[jojo2006]

Bonjour à tout le forum.

Je recherche une macro qui permettrait d'ouvrir un nouveau message sous outlook 2010.

J'aimerai qu'un nouveau message s'ouvre dans ma messagerie ( donc en supposant que outlook soit déja ouvert à moins d'avoir une macro permettant de détecter d'afficher une msgbox pour avertir que outlook doit être ouvert)

en ayant pour parmètre le mail du destinataire, l'objet, et le corps du mail.

Si le mail convient, alors l'utilisateur confirmera l'envoi du mail via outlook.

Si vous avez des pistes je suis preneur

merci d'avance à tous

bonne journée

jojo

 

[sixair]

Re : Macro vba pour ouverture nouveau message/mail dans outlook 2010 prêt à l'envoi

Bonjour Jojo,
Depuis excel si j'ai bien compris,
Il n'est pas obligatoire de lancer Outlook.

J'utilise personnellement cette solution pour envoyer des mails selon détection de certains champs...

Sub TestMail()
Set myitem = Outlook.Application.CreateItem(olMailItem)

Num_Affaire = InputBox("Entrez le n° d'affaire :", "Affaire")

objet = "Concerne l'affaire n° " & prp & ""
myitem.Subject = "L'objet du mail"
myitem.To = "toto@wanadoo.com"
myitem.Display

' on ajoute texte dans le message au format HTML
    myitem.HTMLBody = "<p>Bonjour, </p>  <p>Je vous écris pour. </p>" & _
    "<p>Affaire n°:   <B>" & Num_Affaire & _
    "<p></B>Blablabla...  <B>" & _
    "<p></B>Cordialement. </p>" & myitem.HTMLBody
End Sub

Cordialement
Sixair

 

[sixair]

Re : Macro vba pour ouverture nouveau message/mail dans outlook 2010 prêt à l'envoi

Re-bonjour,
Ne pas oublier d'activer la référence "Microsoft Outlook 12.0 Object Librairy" dans outils-références...
Cdlt

 

[jojo2006]

Re : Macro vba pour ouverture nouveau message/mail dans outlook 2010 prêt à l'envoi

bonjour sixair,

désolé pour ma réponse tardive, je te remercie pour ta solution proposée je vais tester.

Merci beaucoup !

Jo