Salut à tous !
J'ai une question à vous proposer.
Voilà... j'ai un fichier Excel et des boîtes de dialogues pour lancer divers traitements.
Parmi ces traitements, à un moment, dans l'exécution de la macro, il y a un appel à Outlook pour envoyer un mail d'information.
Voici le code :
Code :
- Dim OutlApp2 As New OUTLOOK.Application
- Dim OutlMail2 As MailItem
- Set OutlApp2 = New OUTLOOK.Application
- Set OutlMail2 = OutlApp2.CreateItem(olMailItem)
- With OutlMail2
- .To = "toto@toto.com"
- .Subject = "Objet du message"
- .Body = "Corps du message"
- .Send
- End With
|
A ce moment précis, une boîte de confirmation d'envoi s'ouvre (histoire de valider qu'aucun virus n'est envoyé...) et lorsque l'on choisit OUI, Outlook prend la main... et ma macro continue jusqu'à la fin... et Outlook reste en avant-plan.
Je suis ensuite obligé de cliquer dans la barre des tâches pour revenir à Excel (et notamment sur ma boîte de dialogue de départ).
Ma question est la suivante : est-il possible de remettre Excel en avant-plan ?
Merci pour votre contribution constructive !!!
---------------
iMac 4Ghz (fin 2015) RAM 16Go SSD 256Go SSD 2To