Mot de passe dans userform?

Bonjour ,


J'ai créé une userform toute simple permettant d'ouvrir un fichier selon ce que l'on coche.
Je voulais savoir si il est possible d'ajouter un mot de passe ? Pour ne pas laisser n'importe qui rentrer dans ces fichiers.
Mercii :D

Voici le code ,si ca peut aider :

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub Command_Start_Click() If CheckBox1.Value = True Then Workbooks.Open "\\SERVEURP\Users\Mes documents\VINCENT\projet1"     If CheckBox2.Value = True Then Workbooks.Open "\\SERVEURP\Users\Mes documents\VINCENT\projet2"     ThisWorkbook.Close SaveChanges:=False End Sub

---

Salut

Il te suffit de mettre un mot de passe directement à tes fichiers. Menu : Outils, Protection; tu as le choix entre Protéger le classeur ou Protéger et partager le classeur. Cette dernière option permet de donner accès à des utilisateurs d'un domaine à un classeur se trouvant sur un réseau... Je ne l'ai encore jamais fait... ici, je suis sur mon 'mono-poste' et le seul réseau auquel je suis branchée me permet de t'écrire ce message...

;)

Si ça ne convient pas, tu dis.

Oui ,mais en faites je voulais utiliser un textbox pour rentrer le mot de passe dans mon userform :D
Je sais pas si vous voyez ce que je veux dire ?? lol
Merci

C'est pas vrai ! Bonjour zaza ! Tu es reviendue ? :yaisse2: Ah !!! Tu nous as manqué ! :chin: Ça va ?

@vinssieux
Si tu veux, je peux te proposer un userform qui fait ça...

Citation:

---

Envoyé par vinssieux

Oui ,mais en faites je voulais utiliser un textbox pour rentrer le mot de passe dans mon userform :D
Je sais pas si vous voyez ce que je veux dire ?? lol
Merci

---

Oui... un peu, mais ça n'empêchera pas les utilisateurs d'aller sur le réseau pour ouvrir, via l'explorateur, le classeur en question... Tout dépend de ce que tu veux faire au juste

Citation:

---

Envoyé par ouskel'n'or

C'est pas vrai ! Bonjour zaza ! Tu es reviendue ? :yaisse2: Ah !!! Tu nous as manqué ! :chin: Ça va ?

@vinssieux
Si tu veux, je peux te proposer un userform qui fait ça...

---

Mais non... j'étais pas partie si loin... C'est juste que d'habitude, je suis sur le forum VB6 et antérieur... Mais aujourd'hui... je boude! (même si je sais parfaitement que ce n'est pas digne d'une modo... ;) ) Et non, je ne boude pas l'équipe, juste quelque (dans le sens de quelconque) utilisateur qui abuse de mon bon vouloir.
:chin: même s'il est encore trop tôt (ici, en tous cas) !

euhhh , vi je veux bien ,merci.

Salut vinssieux,
je crois que c'est ce que vous devriez faire, et je ne vois pas ou est le problème.
voici un petit code j'ai mis 2 textbox l'une cacher qui contien lme mot de passe et l'autre celle que l'utilisateur va utiliser pour entrer le mot de paase

Code:

---

1 2 3 4 5 6 7 8

Private Sub CommandButton1_Click() If TextBox1.Value = TextBox2.Value Then MsgBox (" vraie") Else MsgBox ("faux") End If End Sub

---

Bonne chance.
Merci.

Oui j'avais pas pensé a ça :D

Voila ce que ça donne :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Private Sub Command_Start_Click()   If Label3 = TextBox3.Value Then MsgBox ("vraie") Else MsgBox ("faux") End If   If Label3 = TextBox3.Value Then   If CheckBox1.Value = True Then Workbooks.Open "\\SERVEURP\Users\Mes documents\VINCENT\projet1"   If CheckBox2.Value = True Then Workbooks.Open "\\SERVEURP\Users\Mes documents\VINCENT\projet2"     End If   ThisWorkbook.Close SaveChanges:=False End Sub

---

MERCI

Je veux bien te joindre le fichier. Mais en principe, pour qu'il ait une quelconque utilité, tes feuilles doivent être masquées et protégées par mot de passe, et comme il en faut une affichée, gardes-en une vide.
Pour que cette protection par mot de passe ait un minimum de sens, tes macros et tes feuilles doivent être elles aussi protégées.
Ensuite, pour être efficace, le mot de passe doit être demandé à l'ouverture du classeur.
Tu dois aussi empêcher que Ctrl + Pause interrompt la macro.
Et pour finir, il est très facile d'ouvrir un fichier protégé s'il n'est pas cripté.
Si tu as affaire à des béotiens, alors tu as des chances ;)
Le fichier : Pièce jointe 31242

Le nom d'utisateur : marcel
Le mot de passe : zizou

Sinon, tu appuies sur Maj à la demande d'ouverture du fichier, le code n'est pas protégé ;)

Bonne soirée

Ok ,merci :king: