Pense Bête macro Word

Ce pense-bête permet de mettre à jour les champs dans un document Word, en-têtes et pieds de page compris à l’aide d’une petite macro. Et bien non, Word ne le fait pas automatiquement à l’ouverture.
J’en ai eu besoin, donc je l’ai fait, et il est ici parce que je partage.

Sub AutoOpen()
'
' update Macro
' Macro enregistrée le 05/07/2013 par Mehdi HAMIDA
'
' Mettre à jour les champs à l'ouverture du document

' 1. dans l’entête
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.WholeStory
Selection.Fields.Update

' 2. dans le bas de page
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
Selection.WholeStory
Selection.Fields.Update

' 3. dans le corps du document
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
Selection.WholeStory
Selection.Fields.Update

Selection.HomeKey Unit:=wdStory

End Sub