Discussion :

[Golard]

Bonjour, j'ai un grave problème !

Je manipule plusieurs fichiers .docx attachés à un modèle personnalisé MonModele.dotx

Ces fichiers sont sur un réseau et plusieurs personnes peuvent manipuler plusieurs fichiers .docx en même temps.

Il arrive fréquemment qu'à l'ouverture d'un fichier docx, on ait le message "le modèle MonModele.dotx a été ouvert en modification par...", ou encore lors de l'enregistrement du fichier docx, le message "voulez-vous enregistrer également les modifications dans le modèle MonModele.dotx.

Je rencontre le même problème en modifiant les fichiers docx avec mes macros...

Comment empêcher que Word cherche à modifier le modèle alors qu'on ne lui demande pas ???

J'espère trouver un sauveur parmi vous !

Golard.

[carden752]

Bonjour,

Il suffit de mettre le modèle en lecture seule.

[Golard]

Comment faire cela proprement en VBA-Word 2007 ?

Voici comment j'enregistre actuellement mon modèle:

Code :

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

1
2
3
4
5
    myModele.SaveAs FileName:=strModelesPath & strModele & ".dotx", FileFormat:= _
        Word.wdFormatXMLTemplate, LockComments:=False, Password:="", AddToRecentFiles _
        :=False, WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts _
        :=False, SaveNativePictureFormat:=False, SaveFormsData:=False, _
        SaveAsAOCELetter:=False

Rien ne me permet d'indiquer qu'il sera en lecture seule. Faut-il faire précéder l'enregistrement par :

Code :

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

myModele.Final = True

?

[EDIT:] Je viens de tester, il n'est pas possible d'utiliser la propriété .Final dans une macro car ça affiche automatiquement un message qui annonce l'enregistrement, puis la boite de dialogue d'enregistrement ! Donc quelle est la solution pour passer le modèle en lecture seule via VBA (j'aimerais éviter d'alourdir mon code avec FSO, car j'ai réussi à m'en passer jusqu'à présent) ?

MERCI d'avance !!!

[clementmarcotte]

Bonjour,

Et avec :

Code :

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

ReadOnlyRecommended:=true

Cela donne quoi ?

[Golard]

Voici l'aide msdn pour ReadOnlyRecommended (word 2007):

Document.ReadOnlyRecommended Property
Office 2007
True if Microsoft Office Word displays a message box whenever a user opens the document, suggesting that it be opened as read-only. Read/write Boolean.

L'affichage d'une fenêtre proposant à l'utilisateur d'ouvrir en lecture seule est justement ce que je ne veux pas...

[Heureux-oli]

Salut,

je pense que ce qui se produit est l'effet d'une modification avec le choix par défaut de la mise en forme de ton document.

Une solution est de passer en lecture seule le répertoire qui contient les fichiers pour les utilisateurs qui sont de simples utilisateurs.

[Golard]

Bonjour et merci de ton idée,

J'ai passé le dossier en lecture seule via:

Code :

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

    Call FileSystem.SetAttr(strModelesPath, vbReadOnly)

ça semble fonctionner avec des postes sous XP...

Par sécurité, je passe également le fichier modèle en lecture seule.
Mon code VBA le déverrouille puis le repasse en lecture seule quand il a besoin de le modifier.

J'avais aussi pensé à la piste des emplacements approuvés... mais l'emplacement réseau que j'utilise n'est pas "approuvable" par word !
Voici donc 2 questions subsidiaires:
--> penses-tu que le fait que mon dossier de modèles ne soit pas "approuvé" puisse intervenir dans les difficultés que je rencontre ?
--> est-il possible d'approuver un dossier via code vba ?

Merci d'avance...

[Heureux-oli]

Salut,

Je ne vois pas pourquoi ce dossier n'est pas approuvable ?
Si c'est parce que c'est un dossier réseau, on peut spécifier que les dossiers réseau sont approuvables aussi.

Pourquoi fais-tu toutes ces manipulations en VBA ?

[Golard]

Je ne vois pas pourquoi ce dossier n'est pas approuvable ?
Si c'est parce que c'est un dossier réseau, on peut spécifier que les dossiers réseau sont approuvables aussi.

Exact ! Merci de l'info, il fallait juste commencer par cocher une case à cocher autorisant les chemins réseau avant d'essayer d'ajouter un nouvel emplacement.

Pourquoi fais-tu toutes ces manipulations en VBA ?

Idéalement, mon application doit pouvoir être donnée à l'utilisateur "clef en main", sans que celui-ci ait des paramétrages manuels à faire sur son environnement informatique.

Finalement, crois-tu que le fait d'approuver un emplacement puisse améliorer le pb de verrouillage des modèles ?
Et sais-tu approuver un emplacement via VBA (ce type d'action n'étant pas enregistré par l'enregistreur de macro) ?