Bonjour le forum, mydearfriend

 

Voilà j’ai repris le fichier « Navigation dans une BD.xls » et en travaillant dessus (pour mieux le développé) j'ai mis un nouveau USF d’authentification (nom d’utilisateur et mot de passe) afin de protégé la base de données (modification restreinte). J’ai réussi à faire un mot de passe en code VBA (voir UserForm4 qui démarre automatiquement à l’ouverture) mais pas le nom d’utilisateur.

Donc je vous sollicite afin de trouver une astuce.

NB : - le mot de passe est « 1 » ;
       - VBAproject n’est pas protégé (évidement pour vos interventions).

Re netweb2008,

A vrai dire, je ne comprends pas bien ce que tu demandes par rapport à ce nom d'utilisateur... Que souhaites-tu faire exactement ?

Par ailleurs, si je peux me permettre, tu devrais déjà être un peu moins brouillon dans ton code si tu veux progresser et aussi ne pas compliquer davantage la tâche de ceux qui vont tenter de t'aider... Je pense à toutes ces procédures évènementielles vides par exemple et qui n'ont donc aucun intérêt, ou bien la procédure "Private Sub b_ok_Click()" qui n'a visiblement plus lieu d'être puisque tu as renommé le bouton correspondant...

Ne le prends pas mal, mais pour moi, un code propre et clair, des variables bien déclarées, c'est déjà une bonne base pour progresser... et c'est tout l'objet du présent forum.

Bien cordialement,

En quelque sorte ta raison, j’aurais dû faire le ménage mais !!!

 Et bien j’ai reconstruit le fichier  pour mettre un peu d’ordre dans le code (légèrement).

Je m’explique un peu ma vision :

Je veux que mon fichier soi protégé par une boite de dialogue usf (un nom d’utilisateur et un mot de passe pour deux utilisateurs c’est-à-dire une authentification multiutilisateur

L’utilisateur N°1 : la lecture seulement sans la modification da la base de données (accès à la feuille Base de données pour la visionner seulement)

L’utilisateur N°2 : c’est l’administrateur : c’est le super-user  (lecture et modification), ici un USF s’ouvre pour la gestion de la base de données – voir mon exemple usf1.

Bien sure tes propositions seront les bienvenues.

Voir  la pièce jointe remodelée.

 

NB : Je tiens à te signaler que je suis débutant en code VBA

Re netweb2008,

Ci-joint ton classeur modifié en fonction de ce que j'ai pu faire...

Personnellement, je ne crois pas à ces principes de verrouillage/déverrouillage de feuille selon l'utilisateur (et si l'utilisateur n'activait pas les macros à l'ouverture du classeur, comment feras-tu ? Tu vas sans doute essayer de compenser en tentant de gérer la protection lors de la sauvegarde au préalable, mais dans ce cas, tu cours tout droit vers une usine ingérable, c'est sûr...). Mais comme tu souhaites obtenir un effet du genre, je te fais quand même une proposition à titre d'aide...

Je n'ai pas compris pourquoi tu avais modifié ton Userform de demande de mot de passe et avais créé cette fois une zone spécifique Administrateur et une zone spécifique Utilisateur... Pour ma part, j'ai réduis le tout à une seule zone, beaucoup plus simple à gérer.


Dans cette pièce jointe, 3 Logins et/ou Mots de passe à adapter selon ton besoin :
- Utilisateur : admin et mot de passe associé : 1
- Utilisateur : martin et mot de passe associé : 2
- Mot de passe de verrouillage de la feuille BASE : netweb2008

Ainsi :
- L'utilisateur "admin" avec le mot de passe "1" peut accéder à la base en lecture écriture
- L'utilisateur "martin" avec le mot de passe "2" peut accéder à la base en lecture seule
- Les utilisateurs non reconnus n'accèdent à rien (s'ils jouent le jeu de l'activation des macros à l'ouverture du classeur !)

DANS LE MODULE DE CODE DE L'OBJET THISWORKBOOK :

DANS LE MODULE DE CODE DU USERFORM4 :

En espérant que cette pièce jointe pourra t'aider et servir de base à tes travaux...

Par ailleurs, dans CE POST de ton précédent fil de discussions, mon premier message était de t'informer de ma désapprobation en ce qui concerne le multiposts dans les forums. Bien que tu confirmes dans ce même fil :
Citation :Je constate que nous n'avons visiblement pas le même sens du respect de l'autre puisque je tombe aujourd'hui sur cet AUTRE FIL (toujours sans aucune information de part et d'autre que ta question était posée aussi ailleurs)...

J'aime bien aider généralement, mais comme j'ai le sentiment d'être le seul à produire des efforts ici, j'arrête là ma collaboration à ton projet pour ma part et te souhaite une bonne continuation pour la suite...

Cordialement,

Bonsoir myDearfriend!

Je tiens à t’apporter quelques éclaircissements concernant cette discussion et mon projet posté dans ton FORUM

Au début mon objectif été simple : créer une base de données avec des boutons commande pour la gestion (ajout, modification, consultation …etc.) et bien sure la protégée.

J’ai créé une discussion pour poser mon problème (d’ailleurs ton FORUM a été choisi parmi d’autres Forum traitant le même sujet, vu la rapidité et la qualité des réponses.

J’avoue que j’ai posté la même discussion ou presque sur d’autres fil, et ceci dans le but de surmonter les difficultés et pour enrichissement et pas autres choses (l’idée dans mon esprit est simple et c’est une règle d’or : toute solution doit être partagée et une fois résolu je cite le nom de la personne qui a solutionné le problème ) et puisque tu m’as fait des reproches pour le multipost dans les autres forums j’arrête le multipost (c’est ton droit absolue de préserver tes solutions), donc tu constate que ce n’est pas un manque de respect  de ma part (loin de là).

 

Concernant ta question sur le multiutilisateur par macro : ta raison et ta pas raison je m’explique

1 - Si l’utilisateur ne connaît même pas les bases d’Excel on peut tomber sur ton cas cité. Dans cette situation je te donne raison.

2 - Mais pour un utilisateur moyen (quand suppose administrateur) qui c’est acharné pour faire une base de données par code VBA, je ne pense pas qu’il va oublier d’activer les macros et en plus il va pas changer un autre poste pour consulter son fichier Excel où les macros sont désactivés par défaut. Donc tu constate que ce cas de figure est peu probable.

Concernant ton intervention code VBA : je suis très reconnaissant de ta précieuse aide, j’avoue que té chevronné dans Excel et ça correspond à mes attentes.

En espérant ta compréhension.

Cordialement

bonsoir

 

j'aimerais intégrer ceci a mon fichier excel sauf que la liste d'utilisateur et mise dans une feuille appelé admin avec leur mot de passe et je donne access au feuille suivant si il y a un X de présent dans une colonne

 

quelqun pourrais me dire comment faire vu comme je debute en vba