• Initiateur de la discussion Initiateur de la discussion Sebastienh
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S

Sebastienh

Guest
Bonjour à tous,

Voila je mets un fichier que j'ai construit grace au forum.
Celui ci est sur 3 niveaux de securité.
J'aimerais :
Fichier actuel
1er niveau : Administrateur
2ème niveau : accès à 2 feuilles du classeur
3ème niveau : accès à 1 feuille du classeur

Fichier futur
1er niveau : administrateur
2ème niveau : accès à 2 feuilles du classeur mais avec 4 mots de passe différents.
3ème niveau : accès à 1 feuilles du classeur mais avec 4 mots de passe différents.

J'aimerais aussi que lorsqu'on clique sur FERMER SESSION, l'enregistrement se propose.

Encore merci pour votre aide
 
Re : securite partagée

Re,

Si je comprends bien, tu veux qu'on puisse saisir différents mots de passe mais que le résultat soit le même ?

Dans ce cas, tu peux tester avec des "ou" logiques :

Au lieu de :
Code:
'saisie du mot de passe1
    If TextBox1 = "123" Then

Tu peux utiliser :
Code:
'saisie du mot de passe1
    If TextBox1 = "123" Or TextBox1  = "456" Or TextBox1  = "789" Then


Pour fermer le classeur, tu peux utiliser la commande : ThisWorkbook.Close
Pour gérer la sauvegarde ou non, tu peux regarder ici : Excel VBA: Stop/Prevent Save Prompts in Excel Workbooks

Bon courage,

--
macsscam
 
Re : securite partagée

Pour le lien je ne comprends pas tout.
Je dois insérer

Private Sub Workbook_BeforeClose(Cancel As Boolean)

Me.Save

End Sub

mais où et est ce bien cela pour l'enregistrement ?

merci d'avance
 
Re : securite partagée

J'ai encore besoin de vos lumières.
J'aimerais reporter tous les codes tapés sur une nouvelle feuille afin d'avoir une traçabilité des personnes qui viennent sur le fichier.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
6
Affichages
794
S
Réponses
8
Affichages
2 K
S
M
  • Question Question
Réponses
3
Affichages
1 K
Mr.Nobody
M
A
Réponses
3
Affichages
1 K
AlicePrince
A
Retour