Bonjour à tous,
je souhaiterais afficher un message box dans outlook depuis vba excel avant l'envoi d'un e-email (afin qu'aucune action ne soit possible sans avoir cliqué sur le OK).
Voici un extrait de mon code:
Evidemment ça ne marche pas (Erreur 438) sans doute parceque Msgbox n'est pas reconnu ou pas possible. Mon mail s'affiche correctement.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Set Ok = New Outlook.Application Set OkMail = Ok.CreateItem(olMailItem) strHTML = "blah blah" .HTMLBody = strHTML .Display Outlook.Application.MsgBox "blah blah?", vbYesNo + vbInformation, "ATTENTION"
Pour information voici les références que j'utilise :
Microsoft Forms 2.0 OL, Office 14.0 OL, Outlook 14.0 OL, Outlook View Control, DAO 3.6 OL, OLE Automation.
- Ce que je veux faire est-il possible? Si oui comment?
Par avance merci pour votre aide qui me sera précieuse
Partager