Word - Macro - Protection du document

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Word - Macro - Protection du document

didieraucun

Bonsoir à tous,
J'aimerais avoir une macro qui m'ôte la protection du document Word en modification si, seulement, celui-ci est protégé.

Sub Oter_protection()
ActiveDocument.Unprotect ("didier" ) 'didier est mon mot de passe
End Sub

Avec cette macro, si le document n'est pas protégé, j'ai une erreur d'exécution.

Par avance merci

Publicité

juju2k

Regarde du côté de la propriété ProtectionType du document, tu devrais trouver ce que tu cherches...

didieraucun

Le problème, c'est que je un peu nul en VBA
Quelqu'un de plus compétent que moi pourrait peut être compléter le programme :ange:

Epena

Bonsoir,
Pour utiliser l'aide, il faut mettre l'index sur le mot clé et taper sur F1 et la doc s'ouvre avec des exemples qui permettent de progresser. Voici pour le code :

Sub Oter_protection()
If ActiveDocument.ProtectionType <> wdNoProtection Then
ActiveDocument.Unprotect "didier" 'didier est mon mot de passe
End If
'ou alors
On Error Resume Next
ActiveDocument.Unprotect "didier" 'didier est mon mot de passe
On Error GoTo 0
End Sub

Cordialement
Epéna

didieraucun

Merci beaucoup :-)

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Word - Macro - Protection du document

Sujets relatifs
Word - Macro - Enregistrement auto pied de page	Ouverture d'un fichier Excel avec un XML et lancement d'une macro
Liaison Word/Page Web	PROBLÈME MACRO EXCEL
PROBLÈME AVEC MACRO SUR EXCEL	Script d'enregistrement du document courant en VBS
Ouvrir un fichier Word dans PHP	Remplir un fichier Word type avec des valeurs PHP
Pourquoi les macros d'un Excel intégré dans Word ne fonctionne pas?
Plus de sujets relatifs à : Word - Macro - Protection du document

Page générée en 0.041 secondes