Discussion :

[Elstak]

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.

PasswordDocument Argument de type Variant facultatif. Mot de passe nécessaire à l'ouverture du document.

J'ai tenté un truc (nul..) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.Documents.Open (ThisDocument.Path & "\Essai.doc",,,,"monpass")

on ne rigole pas merci

[Elstak]

hmm j'ai trouvé ca ailleurs et ca marche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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...