Workbooks.Close SaveChanges:=False - Bloque la macro

Bonjour,

Je cherche à comprendre pourquoi ma macro se lance à moitiée lorsque je fais un Worbook_Open sur un autre classeur :

Sub Workbook_Open()

Application.Run ("mise_a_jour")

End Sub

Sub mise_a_jour()

Workbooks("Kronos.xlsm").Close SaveChanges:=False

Dim SourceFile, DestinationFile

    Kill "C:\BE\Kronos\Kronos.xlsm"

    SourceFile = "Y:\RPE\Leonardo\EXCEL\Kronos\Kronos.xlsm" ' Define source file name.
DestinationFile = "C:\BE\Kronos\Kronos.xlsm" ' Define target file name.
FileCopy SourceFile, DestinationFile ' Copy source to target.

    Workbooks.Open ("C:\BE\Kronos\Kronos.xlsm")

    Workbooks("MAJ_Kronos.xlsm").Close SaveChanges:=False

End Sub

La première ligne fonctionne bien

Workbooks("Kronos.xlsm").Close SaveChanges:=False

Ensuite rien ce passe...J'ai essayé plusieurs chose mais rien ne change...Aucune erreur indiqué par Excel

Si je lance cette macro manuellement tout marche...

Une solution ?