Discussion :

[zebi42]

Bonjour,


J'ai dans des documents Word une foule de lien du style
file:///\\serveura\xxx.doc
Or je dois passer ces documents sur un autre serveur, je dois donc aussi modifier les liens.
Question: y a t'il un moyen de changer en automatique dans tous les documents file:///\\\serveura par file:///\\\serveurb
Je précis qu'il y a des centaines de documents faisant references à des dizaines d'autres documents

Merci

[Heureux-oli]

Oui, mais il faut mettre les mais dans le moteur et faire du vba ou avec la fonction rechercher/remplacer

http://sepia.developpez.com/office/w...cherremplacer/

[zebi42]

Oui, mais il faut mettre les mais dans le moteur

Merci , mais en francais, qu'est-ce que cela signifie ?
Je te rappelle que ce sont des liens hypertexte qui n'apparaissent doc pas en clair dans le document

[Heureux-oli]

Mettre les mains dans le moteur, c'est passer par le VBA.

Essaie cette macro :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub RemplacementLink()
Dim hp As Hyperlink
Dim strAddr As String
Debug.Print ActiveDocument.Hyperlinks.Count
For Each hp In ActiveDocument.Hyperlinks
   strAddr = hp.Address
   strAddr = Replace(strAddr, "Vieux Morceau", "Nouveau Morceau")
   hp.Address = strAddr
Next hp
 
End Sub

Remplace dans le code les parties à trouver et à remplacer.

[zebi42]

Merci, mais hp.adress ne renvoie pas le chemein complet du document à atteindre, mais seulement son nom; or c'est le chemein que je veux modifier

[Heureux-oli]

Surprenant, j'ai bien le chemin !
Peux-tu mettre sur le forum un exemple de document ?

[zebi42]

ci-joint document

[Heureux-oli]

Salut,

tu reçois le nom du document, parce que c'est un lien relatif vers un document situé dans les documents utilisateurs.

Essaie la macro avec un lien pointant vers un document situé sur le serveur.

[zebi42]

Autrement dit, je n'ai pas de solution à mon problème de départ

Grand merci tout de même.

[Heureux-oli]

Salut,
si, au lieu de faire un remplacement, il faut faire un ajout.

Si les documents au bout des liens sont dans le même répertoire, l'ajout devrait suffire pour la nouvelle localisation.

[zebi42]

Ce n'est pas le cas

Merci

[Heureux-oli]

Salut,

Je ne sais pas, le code que j'ai posté un peu plus haut renvoie bien le chemin complet de la cible chez moi.

[Sepia]

Salut,

Je ne vois pas pourquoi ça ne marche pas mais bon on va passer à l'autre proposition de Heureux-Oli : utiliser la fonction remplacer de Word.

1. Ouvre ton Word
2. Selectionne tout ton doc (<CTRL>+A)
3. Effectue un clic droit et fais "Basculer les codes de champ"
4. Lance la commande "Edition-Remplacer" avec comme valeur de saisie
   
   • pour Rechercher = HYPERLINK "
   • pour Remplacer = HYPERLINK "file//\\toto:

@+