Poste dysfonctionnel sur une macro

Bonjour à tous !

J'ai un fichier qui fonctionne correctement sur plusieurs postes. Par contre, sur un poste j'ai un message d'erreur. Néanmoins, toutes les versions d'Excel sont les mêmes sur les différents postes. Je ne vois pas d'où vient le problème. PS : tous les postes n'ont aucun fichier Excel d'ouvert avant mes tests d'ouverture.

Sur le Workbook du fichier :

Private Sub Workbook_Open()

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

End Sub

Première macro :

Sub actualisation()

If ThisWorkbook.ReadOnly Then Exit Sub
ThisWorkbook.RefreshAll

End Sub

Deuxième macro :

Sub fermeture()

ThisWorkbook.Save
ThisWorkbook.Close

End Sub

Le bug lors de l'ouverture du fichier se situe sur la ligne

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

Savez-vous pourquoi la macro fonctionne à l'ouverture sur la plupart des postes sauf 1 seul ?

Pour l'instant, je ne vois qu'une désinstallation/réinstallation d'Office comme solution.

Cordialement,

Charles CARON

Salut, voici un post similaire qui à été résolu peut être que cela peut apporter des pistes de reflexion ?

https://forum.excel-pratique.com/excel/macro-bug-sur-un-poste-157106

Amicalement.

Bonjour,

et le message d'erreur est ???
eric

Bonjour,

Le message d'erreur est le suivant :

Et la ligne qui plante :

J'ai trouvé d'où venait le problème :

La case "Activer toutes les macros" était activée sur le poste dysfonctionnel.

Savez-vous comment avoir un code VBA qui marche quelque soit la case cochée ? D'ailleurs, comprenez-vous pourquoi la macro bug à l'ouverture lorsque cette case est cochée ?

Cordialement,

Charles CARON

Bonjour,

pour moi il n'y a aucun lien, ça sent plutôt le bug si c'est vraiment la cause.
Tu as testé en le remettant et l'anomalie se reproduit ?
eric

Oui j'ai testé et ça replante, merci qd même :)