Macro enregistrer et quitter plante XL2007

[Tiobi]

Bonjour,

La macro suivante fonctionnait très bien sous XL 2003
mais depuis que je suis passé a XL 2007 elle me plante systématiquement l'application.

J'ai essayé sur plusieurs PC utilisant la version XL 2007 : même résultat

Voici la macro qui est pour le moins basique

Sub Enregistrer_Et_Fermer()

ActiveWorkbook.Save
Application.DisplayAlerts = False
ActiveWorkbook.Close

End Sub

Quelqu'un aurait une idée ?
Merci.

 

[pierrejean]

Re : Macro enregistrer et quitter plante XL2007

Bonjour Tiobi

Chez moi cette macro fonctionne correctement sous XL 2007
Tu n'aurais pas une

Sub Workbook_BeforeClose

qui met la panique ???

 

[MJ13]

Re : Macro enregistrer et quitter plante XL2007

Bonjour Tiobi, Pierrejean

Le problème est qu'on ne sait pas où est placé ce code?

 

[Tiobi]

Re : Macro enregistrer et quitter plante XL2007

Voici le fichier en question

 

[MJ13]

Re : Macro enregistrer et quitter plante XL2007

Re

Sinon, tu peux tester ce code en remplacement:

ThisWorkbook.Close 1

 

[Misange]

Re : Macro enregistrer et quitter plante XL2007

Bonjour

ton classeur ne plante pas chez moi...

 

[MJ13]

Re : Macro enregistrer et quitter plante XL2007

Re

Sinon, peut-être un problème de MAJ de XL2007 (il est fortement conseillé de faire les MAJ sur les PCs en général):

Voir ici par exemple:

https://www.excel-downloads.com/threads/resolu-plantage-suite-a-un-close.202105/

 

[Tiobi]

Re : Macro enregistrer et quitter plante XL2007

Je penche également pour un problème de mise à jour de Windows.

Même avec ThisWorkbook.Close 1 ça plante.

En tous cas, merci de votre contribution.