> Tous les forums > Forum Bureautique
 enlever et remettre la protection d'un document Word en VBASujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
deb56
  Posté le 25/01/2018 @ 01:00 
Aller en bas de la page 
Petit astucien

Bonjour à tous.
Je cherche à insérer dans une macro VBA la levée puis la remise de la protection du document Word (2003).

J'ai essayé les formules "thisdocument.protect = false (puis true)", mais le test me met en erreur.

Vos lumières me seraient utiles.

Merci d'avance. Cdt

[Configuration automatique à compléter]
Windows 10
Chrome 63.0.3239.132

Publicité
deb56
 Posté le 25/01/2018 à 11:19 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour à tous.

J'ai essayé de résoudre mon problème ci-dessus par enregistrement. Ma formule était fausse: ça s'exprime:

"ActiveDocument.Unprotect" et "ActiveDocument.Protect", mais la seconde formule arrête et annule l'enregistrement, si bien que je ne sais pas donner les arguments, à savoir dans le cas présent: 1) autoriser le remplissage des formulaires 2) ne pas mettre de mot de passe (Password:= None ???).

Enfin, comment faut-il écrire ces arguments en VBA? Entre parenthèses?

A nouveau, merci par avance de vos aides. Cdlt

deb56
 Posté le 25/01/2018 à 14:50 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour à tous.

En continuant à tâtonner, j'ai trouvé la solution: ça s'écrit:

ActiveDocument.Unprotect Password:="******" et ActiveDocument.Protect wdAllowOnlyFormFields, Password:="******".

Je vous le donne au cas où ça intéresserait quelqu'un d'autre. Et je note le sujet comme Résolu.

Cdlt

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
209,99 €Ecran PC 24.5 pouces Dell S2522HG (FullHD, IPS, 240 Hz, 1 ms, FreeSync) à 209,99 €
299,99 € -30%

Fnac fait une promotion sur l'écran PC 24.5 pouces Dell S2522HG qui passe à 209,99 € au lieu de 299,99 € ailleurs. Cet écran possède une dalle IPS Full HD (1920x1080) à 240 Hz et avec un temps de réponse de 1 ms. Il est compatible FreeSync (et GSync via Adaptive Sync). La hauteur, l'inclinaison et la rotation de l'écran sont réglables. 2 ports HDMI et 1 port DP. Il peut faire également office de hub USB 3.2 (2 ports).


Voir l'offre
9,99 €Lot de 32 piles Philips AAA à 9,99 €
15 € -33%

Fnac fait une promotion sur le lot de 32 piles Philips AAA qui passe à 9,99 € au lieu de 15 €.


Voir l'offre
39,99 €Tondeuse sans fil Philips Multigroom 7000 + 8 sabots (cheveux, barbe, corps, oreilles/nez) à 39,99 €
80 € -50%

Amazon fait une promotion sur la tondeuse sans fil Philips MG7745/15 qui passe à 39,99 € alors qu'on la trouve ailleurs à partir de 80 €. Cette tondeuse en métal peut tailler et sculpter la barbe, les cheveux, le corps, le nez et les oreilles.... 3 sabots cheveux (9, 12 et 16 mm), 2 sabots barbe (1 et 2 mm), sabot barbe ajustable (3 à 7 mm) et 2 sabots pour le corps. L'appareil est 100% étanche et offre une autonomie de 2 heures.


Voir l'offre
219,99 €Ecran 27 pouces incurvé Viewsonic VX2718-2KPC (QHD, 165 Hz, 1 ms) à 219,99 €
299,99 € -27%

Cdiscount fait une belle promotion sur l'écran 27 pouces incurvé Viewsonic VX2718-2KPC-MHD qui passe à 219,99 € alors qu'on le trouve ailleurs à partir de 299,99 €. Cet écran dispose d'une dalle VA QHD  (2560x1440) à 165 Hz avec un temps de réponse de 1 ms. Il est compatible Adaptive Sync.

Au niveau connectique, vous trouverez une entrée DP et deux entrées HDMI. Une très bonne affaire. 


Voir l'offre

Sujets relatifs
Aucun sujet pertinent lié trouvé
 > Tous les forums > Forum Bureautique