Bug lancement macro

Bonjour,

J'ai un message d'erreur suivant lorsque ma macro se lance. J'ai essayé sur le poste d'un collègue ça ne fonctionne pas non plus.

Ci-joint le fichier en question avec macro + workbook.

Cldt,

Charles CARON

Bonjour,

Mis à part le fait que la macro fermeture est absente, le classeur fonctionne parfaitement.

Cause probable du dysfonctionnement : problèmes de chemin de fichier. Le classeur n'est sans doute pas dans un dossier reconnu comme dossier de travail habituel.

A+

Mon code était mauvais il appelait une macro inexistante lol, avec le code suivant ça fonctionne :

******************Code WorkBook******************

Private Sub Workbook_Open()

Call ouverture

End Sub

******************Macro ouverture******************

Sub ouverture()

If ThisWorkbook.ReadOnly Then Exit Sub

Application.OnTime TimeValue("23:00:00"), "fermeture"

End Sub

******************Macro fermeture******************

Sub fermeture()

ThisWorkbook.Save
ThisWorkbook.Close

End Sub

Cordialement,

Charles CARON