VBA fermer boîte d'envoi Outlook une fois mail envoyé
Bonjour,
J'ai crée une VBA dans Excel 2010 pour envoyer une feuille de mon classeur par mail, mais une fois le mail envoyé, la partie en haut servant à inscrire l'adresse du destinataire, l'objet du message, etc., reste présent, or cela me réduit considérablement la vision de mon travail.
Que dois-je mettre pour compléter ma VBA et que cette fenêtre d'envoi se ferme lorsque le courrier a été envoyé ?
Voici ma VBA :
Sub envoiPlageCellules_Excel()
ActiveSheet.Range("A5:J35").Select
ActiveWorkbook.EnvelopeVisible = True
With ActiveSheet.MailEnvelope
.Introduction = "Bonjour, Suite à la réunion PPS effectuée en ce jour, veuillez trouver ci-joint le Rapport d'Anomalie vous concernant."
.Item.To = Range("B3")
.Item.Subject = "Rapport d'anomalie"
End With
End Sub
Merci énormément pour votre aide,
Vanessa
Bonjour
ActiveWorkbook.EnvelopeVisible = FalseSi ok, merci de cloturer le fil en cliquant sur le V vert à coté du bouton Editer
Amicalement