Discussion :

[Souriane]

Bonjour,

Sur un serveur que j’appellerai « B » j’ai une tonne de documents créés au cours des 8 dernières années et qui, dans « Modèles et compléments \ Modèle de document » ont un modèle d’attaché. Ce n’est pas moi qui ai créé les documents, c’est une ancienne collègue. Cela ne me sert à absolument à rien qu’ils soient lié à un autre modèle.

Dernièrement, au travail, nous avons un vieux serveur (mettons le serveur « A ») qui a rendu l’âme.

Le hic, c’est que mes tonnes de documents qui sont sur le « B » étaient reliés à des modèles qui se trouvaient sur le serveur « A »!

Ce qui fait qu’on est plus capable d’ouvrir les fichiers « reliés ». Si on le fait, Word semble chercher indéfiniment et il faut faire « CTRL+Del » pour pouvoir redémarrer Word.

Pour contourner le problème, j’ai transféré tous mes répertoires de documents sur mon disque dur. Je me suis débranchée de sur le réseau. J’ai créé une macro en word qui ouvre tous les documents de tous les répertoires doc un à un, enlève la référence au modèle du serveur « A » (s’il y a lieu), sauvegarde et ferme. Et quand tout ça a été fini, j’ai rapatrié le tout sur le serveur.

Le seul problème que ça m’a causé est que les fichiers qui étaient des documents de fusion ont perdu leur lien vers la BD, le nom de la requête à laquelle ils étaient liés ainsi que les critères de sélection qui pouvaient se trouver dans le fichier Word. Mais bon, c’est toujours mieux que de tout perdre!

La question est : POURQUOI ÇA FAIT ÇA? Pourquoi ça fait planter Word? Si j’ouvre le document de quelqu’un de l’externe qui était lié à un modèle, je suis quand même capable d’ouvrir le fichier! Pourquoi les miens?

Aussi : aurais-je pu agir autrement que de faire une macro en vba? Car je trouve encore parfois des documents qui n’ont pas encore été « déliés » et chaque fois je dois me débrancher du réseau pour pouvoir l’ouvrir.

merci de votre aide!

Souriane

[Heureux-oli]

Salut Souriane,

J'ai rencontré le même problème, mais il n'est pas simplement lié aux modèles, il y a aussi la version de Word qui entre en ligne de compte.
Tu ne le mentionnes pas mais je suppose que les "vieux" documents ont été crées avec une version antérieure.

si tu patientes assez longtemps, Word finit par les ouvrir, il faut parfois 1h30 par document.

Une autre méthode est l'ouverture avec réparation quand c'est nécessaire.

Pour les bases de données accrochées, tu as modifié les documents principaux de fusion en simples documents.

[Souriane]

Tu ne le mentionnes pas mais je suppose que les "vieux" documents ont été crées avec une version antérieure.

Ça fait tout à fait du sens, oui.

si tu patientes assez longtemps, Word finit par les ouvrir, il faut parfois 1h30 par document.

Hihi! 1h30!!!! Tu imagines le temps que ça m’aurait pris ! J’ai calculé que j’ai passé la macro dans 70 000 fichiers et que de ce nombre il y en avait pas loin de 11 500 que la macro a dû délier le modèle. Ne tombe pas sur le dos avec 70 000 fichiers : je travaille pour une ville et ce sont tous les fichiers des règlements, les ordres du jour, les procès-verbaux, etc. que nous devons obligatoirement conserver!

Pour les bases de données accrochées, tu as modifié les documents principaux de fusion en simples documents

Non, c’est que je travaillais en mode local, le fichier tentait quand même d’aller chercher la BD sur le réseau donc je n’avais pas le choix. Et comme sur les 70 000 fichiers, il y en a environ le quart lié à une de nos 10 BD, ça aurait été long de toujours dire au système où aller chercher le chemin de la bd en mode local. Et puis de toute façon, une fois revenu en mode réseau, les fichiers aurait pointé sur une copie de la bd en mode local donc y aurait fallu refaire dans le sens inverse ensuite?

Je suis ouverte à d’autres commentaires sur ce que je viens d’écrire, si tu as de meilleures solutions – je veux apprendre de mes erreurs pour la prochaine fois!

Merci pour ton temps

Guylaine

[Heureux-oli]

Salut,

Malheureusement, il n'y a pas d'autre solution.
J'aurais appliqué la même méthode.

[M. Patate]

Bonjour à vous,

Je rencontre actuellement le même problème avec l'arrêt d'un serveur.
Auriez vous encore votre script pour traiter en masse tous les fichiers ?

[Heureux-oli]

Salut,

Le code, on peut l'écrire ensemble.

[M. Patate]

et bien, comme c'est gentiment proposé, j'accepte volontiers !
J'ai déjà récupéré une partie en vba qui fonctionne :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Sub ChangeTemplates()
    Dim strDocPath As String
    Dim strTemplateB As String
    Dim strCurDoc As String
    Dim docCurDoc As Document
 
    ' set document folder path and template strings
    strDocPath = "C:\Temp\"
    strTemplateB = "Normal.dot"
 
    ' get first doc - only time need to provide file spec
    strCurDoc = Dir(strDocPath & "*.doc")
 
    ' ready to loop (for as long as file found)
    Do While strCurDoc <> ""
        ' open file
        Set docCurDoc = Documents.Open(FileName:=strDocPath & strCurDoc)
        ' change the template
        'If docCurDoc.AttachedTemplate = strTemplateA Then
        docCurDoc.AttachedTemplate = strTemplateB
        'End If
                ' save and close
        docCurDoc.Close wdSaveChanges
        ' get next file name
        strCurDoc = Dir
    Loop
    MsgBox "Finished"
End Sub

ca ne fait que virer le lien et le remplacer par normal.dot et ca me convient pour l'instant.
Cependant, il me manque une chose... la fonctionnalité de parcours les répertoires et sous répertoires... Une idée ?

[Heureux-oli]

Salut,

Une piste ?

Dans cette discussion, une petite partie de ta solution s'y trouve

http://www.developpez.net/forums/d95...donnees-excel/

[M. Patate]

Finalement, j'ai trouvé la solution. Quelqu'un a déjà fait un petit outil pour modifier tout ca. Y'a même une interface, cela s'appelle Word Templates Editor.
Il n'y a donc plus de code à faire !