je viens de tester un enregistrement d'une petite macro, affectée à un bouton sur la barre d'accès rapide.
Code :
- Sub chemin()
- '
- ' chemin Macro
- '
- '
- Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
- "FILENAME \p ", PreserveFormatting:=True
- End Sub
|
ça insère le chemin et le nom du fichier, à l'endroit où se trouve mon curseur.
par contre ça ne se met pas à jour si je déplace le fichier ou le renomme.
il y a encore du boulot, mais ça te donne une piste
ça rejoint ce souci en fait : http://support.microsoft.com/?scid [...] x=19&y=13#
Code :
- Sub AutoOpen()
- Dim aStory As Range
- Dim aField As Field
- For Each aStory In ActiveDocument.StoryRanges
- For Each aField In aStory.Fields
- aField.Update
- Next aField
- Next aStory
- End Sub
|
j'ai testé en utilisant cette macro.
à présent, j'insère mon chemin et le nom du fichier avec la macro donnée au début du post.
puis je ferme tout.
je renomme le fichier, et quand je l'ouvre de nouveau, tout est bien à jour (idem si je change l'emplacement du fichier)
Message édité par blueteen le 26-01-2007 à 17:37:31