Exécuter une macro puis fermer excel
Résolu
angus75
Messages postés
19
Statut
Membre
-
angus75 Messages postés 19 Statut Membre -
angus75 Messages postés 19 Statut Membre -
Bonjour,
J'aimerais une macro qui envoi une fichier Excel par mail puis ferme Excel. J'ai fais le code suivant mais Excel reste ouvert... Què passa ?
Sub Macro2()
With ActiveWorkbook
.SendMail Recipients:=Array("tttt@toto.ch", "fffff@toto.ch"), Subject:="XYZ - XXXX " & Format(Date, "dd/mm/yyyy")
.Close SaveChanges:=True
ActiveWorkbook.Save
End With
MsgBox ("Merci A+")
Application.Quit
End Sub
J'aimerais une macro qui envoi une fichier Excel par mail puis ferme Excel. J'ai fais le code suivant mais Excel reste ouvert... Què passa ?
Sub Macro2()
With ActiveWorkbook
.SendMail Recipients:=Array("tttt@toto.ch", "fffff@toto.ch"), Subject:="XYZ - XXXX " & Format(Date, "dd/mm/yyyy")
.Close SaveChanges:=True
ActiveWorkbook.Save
End With
MsgBox ("Merci A+")
Application.Quit
End Sub
6 réponses
-
Non, le classeur se ferme bien, mais Excel reste ouvert...comme un con.
(entre nous, j'y connais pas trop, mais j'ai de la peine à comprendre comment il peut fermer le programme alors qu'il n'a pas encore eu le End Sub...) -
C'est normal qu'Excel ne quitte pas et que tu n'ais pas ta Msgbox.
Lorsque tu fermes le classeur, la macro s'arrete...
Il faut donc modifier ton code :
Sub Macro2()
ActiveWorkbook.SendMail Recipients:=Array("tttt@toto.ch", "fffff@toto.ch"), Subject:="XYZ - XXXX " & Format(Date, "dd/mm/yyyy")
ActiveWorkbook.Save
Application.Quit
End Sub
+++
Dépannage, formation et création de site internet en Gironde
www.ailp-informatique.net -
La ligne ActiveWorkbook.Save n'est pas necessaire vu que tu ferme l'activeworkbook juste avant en le sauvegardant.
La commande Application.Quit ferme bien Excel chez moi, est-ce juste Excel qui reste ouvert ou ton classeur également ?
Dépannage, formation et création de site internet en Gironde
www.ailp-informatique.net -
Essaye d'ajouter cette commande après Application.Quit :
Set ApplicationExcel = Nothing
Dépannage, formation et création de site internet en Gironde
www.ailp-informatique.net -
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question -
ça ne change pas. Excel reste ouvert.
(je sais pas si ça fait quelque chose, mais pour l'instant, je m'envoie un mail à moi-même et j'ai la fenêtre popup d'Outlook qui s'ouvre et m'annonce l'arrivée d'un message... Est-ce Outlook prend la main avant la fermeture de Excel...et la macro s'arrête...) -
C'est nickel, ça marche. Ooooh, magie de l'informatique.
Merci beaucoup !!
