problème mise à jour d'un classeur

Bonjour,

j'ai un classeur ( qui est souvent modifier ) sur un réseau ( qui peu être consulté par plusieurs personnes ) que je voudrai mettre à jour automatiquement toute les 30 minutes.
Pour cela j'ai crée une macro à l'ouverture du classeur qui réouvre le classeur au bout de 30 minutes,

dans thiswoorbook

Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:30:00"), "Sortie"
End Sub

dans un module j'ai créé

Sub Sortie()
Application.DisplayAlerts = False
Workbooks.Open ("C:\Users\Moi\Desktop\Planning\Planning.xls")
Application.DisplayAlerts = True
End Sub

Problème:
la macro s'exécute bien à l'ouverture du classeur par contre elle ne s'exécute pas à la réouverture du classeur.
j'ai bien une mise à jour après 30 minutes ( la première fois ) puis plus rien.

Si quelqu'un peu trouver une solution à ce problème par avance Merci.