Manipulation des fichiers word protégés

Soyez le premier à donner votre avis sur cette source.

Snippet vu 27 960 fois - Téléchargée 74 fois

Contenu du snippet

cette source vous montre comment attribuer un mot de passe à un document microsoft word ouvert puis vous explique comment ouvrir un document protégé sans intervention de l'utilisateur

Source / Exemple :


Sub protectdocument()
'protège le document actif
Dim msword As Word.Application
Set msword = Word.Application
msword.ActiveDocument.password = "nix" 'vous me direz que j'aurais pu trouver mieux comme mot de passe :o)
msword.ActiveDocument.Save
msword.Quit
End Sub

Sub opendocument(file, password)
Dim msword As Word.Application
Set msword = Word.Application
'consultez l'aide relative à open
msword.Documents.Open file, , , , password
End Sub

Conclusion :


n'oubliez pas d'incrire la bibliothèque d'objet microsoft word dans votre projet

A voir également

Ajouter un commentaire

Commentaires

Messages postés
12
Date d'inscription
mercredi 28 novembre 2007
Statut
Membre
Dernière intervention
3 avril 2008

cocomo
Messages postés
10
Date d'inscription
vendredi 6 février 2004
Statut
Membre
Dernière intervention
24 septembre 2007

Re,
Je viens de me rendre compte que mettre une remarque sans en connaitre la solution, c'était pas top... Donc la voici:

1° Il ne faut pas oublié de rajouté la référence (Dans "Project" - "Références...") Microsoft Word Library 8-9-10... -> Sa sa dépend la version...

2° Si il y a tjs une erreur a la ligne : "Set msword Word.Application", il faut la changer par :"Set msword New Word.Application" ...

C'est fous ce qu'un petit "New" peut faire comme différence lol allé bye (En tout cas maintenant chez moi sa fonctionne...)

@+
Messages postés
10
Date d'inscription
vendredi 6 février 2004
Statut
Membre
Dernière intervention
24 septembre 2007

Bonjour (ou bonsoir),
J'aimerais dire a l'auteur, painkiller (pas mal le nom...), que sa source ne fonctionne pas partout... En tout cas pas chez Magicos94 et pas chez moi, sa fait déjà deux. Mais c'est pas grave, les mise à jour sont faites pour ca, en effet, ce serait bien si tu en mettait une autre qui fonctionnerais (un peu plus lol)... Mais c'est toujours pas grave; j'écris en fait pour signaler a ceux qui ne le savent pas encore que les logiciel de recherche de mot de passe, qu'il soit officiel ou pirates, sa existe ! Il n'y a qu'a taper dans son moteur de recherche préféré un truc du style : "Mot de passe Word Oublié Logiciel"

Sur ce, bye et @+...
Messages postés
1
Date d'inscription
mercredi 7 mars 2007
Statut
Membre
Dernière intervention
7 mars 2007

Bonjour,
Je n'arrive pas à faire fonctionner cette source.
Des explications seraient les bien venues.
Cordialement.
Messages postés
8
Date d'inscription
dimanche 27 janvier 2002
Statut
Membre
Dernière intervention
20 août 2003

Je pense que ça va etre Super cool si vous metter un fichier Zip qui dispose un Example de ce code Source.
De la part de AmyInside==> Amyne Berrada
Afficher les 10 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.