Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Word > VBA Word
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 28/06/2006, 11h53   #1
Membre éclairé
 
Inscription : février 2006
Messages : 932
Détails du profil
Informations personnelles :
Âge : 26

Informations forums :
Inscription : février 2006
Messages : 932
Points : 391
Points : 391
Par défaut [VBA-W] Ouvrir un fichier protégé

Coucou,

j'ai vu dans la faq comment protéger un doc word mais maintenant je voudrais savoir comment l'ouvrir (pour qu'il mette automatiquement le password et ne plus avoir la fenetre le demandant à l'ouverture)

je comprend rien et dnas l'aide y'a pas d'exemple sur ca.

Citation:
PasswordDocument Argument de type Variant facultatif. Mot de passe nécessaire à l'ouverture du document.
J'ai tenté un truc (nul..) :

Code :
Application.Documents.Open (ThisDocument.Path & "\Essai.doc",,,,"monpass")
on ne rigole pas merci
Elstak est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 28/06/2006, 12h09   #2
Membre éclairé
 
Inscription : février 2006
Messages : 932
Détails du profil
Informations personnelles :
Âge : 26

Informations forums :
Inscription : février 2006
Messages : 932
Points : 391
Points : 391
hmm j'ai trouvé ca ailleurs et ca marche


Code :
1
2
3
4
5
6
7
8
9
10
11
12
Sub DevPass()
 
    Call Opendocument(ThisDocument.Path & "\Essai.doc", "Pass")
 
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
jcomprend pas trop la différence mais bon...
Elstak est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 23h57.


 
 
 
 
Partenaires

Hébergement Web