Fermeture automatique d'un classeur et d'une fenêtre d'alerte

Bonjour à tous, je vous sollicite sur un petit problème de message box.

dans un classeur, j'ai une macro qui va chercher des infos dans d'autres classeurs. la macro ouvre le classeur externe, prend les infos, les inscrits dans la feuille, puis ferme le classeur externe.

Set classeur = Workbooks.Open(cheminDossier & nomFichier, ReadOnly:=True, Password:=codeDeverrouillage)

Donc à la fin de ma macro, il y a simplement :

    classeur.Close SaveChanges:=False

ça marche bien, sauf que dans certains cas, j'ai une petite fenêtre d'alerte (propre au classeur externe)

capture d ecran 2023 06 15 161745

Du coup , je ferme avec la croix ou le bouton Ok, puis le classeur se ferme, sauf que du coup la macro est suspendue temps que je n'effectue pas la manipulation.

J'ai essayé avec

Application.DisplayAlerts = False
classeur.Close SaveChanges:=False

mais sans succès. Il y a t'il une solution ?

merci beaucoup

Bonjour lcharron,

Peut-être avec

Application.EnableEvents = False
' Puis code d'ouverture et de fermeture
' ....
' Puis
Application.EnableEvents = True

A+

merci Bruno, mais après test, cela ne marche pas :(

je rectifie :) ça marche , merci beaucoup

Rechercher des sujets similaires à "fermeture automatique classeur fenetre alerte"