Protéger un document WORD à partir d'un code VBA

Bonjour,

Je dois modifier un programme qui a été créé par une autre personne qui n'est plus dans mon entreprise.

Ce programme, à partir de données exportées du SI (Excel), génère des contrats. Le lien entre les exports et les trames vierges de contrat est effectué par des champs de fusion, et le tout automatisé sous VBA.

Je souhaiterai faire en sorte que les documents WORD finaux (cad les contrats), soient protégés de toutes modifications à la suite de leur génération.

N'étant pas un expert en VBA, pouvez-vous m'indiquez quel code utiliser pour protéger un document WORD ?

Merci d'avance

Bonjour.

As-tu songé à faire une édition au format .pdf?

Cordialement,

PGZ

Salut,

Parfois l'enregistreur de macro donne de bons résultats.

Il donne ceci :

Code:

---

1 2 3

ActiveDocument.Protect Password:="oli", NoReset:=False, Type:= _ wdAllowOnlyReading, UseIRM:=False, EnforceStyleLock:=False

---

Salut Joévin,

Les 2 solutions sont bonnes mais celle de PGZ est plus définitive puisque les modifications d'un PDF sont quasi impossibles mais elle te permet de directement envoyer tes contrats à tes clients (PDF reste le format de diffusion le plus commun) mais celle de Heureux-Oli te permet de garder la possibilité de modifier et de récupérer le document (au format Word) à condition d'avoir le mot de passe.

@+

Salut,

De toute façon, le read-only n'est qu'une illusion en Word.
Si tu fais Ctrl + A pour sélectionner le document, Ctrl + C pour copier.
Il suffit de coller dans un nouveau document et le tour est joué.

Je préfère conserver le format WORD car le contrat est ensuite validé par la direction d'où la necessité de pouvoir le modifier. Mais c'est vrai que le Pdf serait mieux.

Merci Heureux-Oli pour ce code. Ca fonctionne avec le code suivant:
wordDocs(j).Protect Password:="......", Type:=wdAllowOnlyComments

J'ai remplacéType:=wdAllowOnlyReading par Type:=wdAllowOnlyComments car sinon ca marchait pas. Je ne sais pas pourquoi mais le principal c'est que le doc soit protégé....

Encore merci pour votre aide.