Discussion :

[Igloobel]

J'ai une petite question je dois, sur plusieurs classeurs Excel installer des mots de passes multi utilisateurs

exemple

sur classeur 1
user1 peut lire feuille1 (seulement) et modifier feuille2
user2 peut modifier feuille1 et pas voir feuille2
user3 peut lire feuille1 et feuille2 et modifier feuille3
user_patron lire et modifier tout!

idem sur classeur 2 et 3 avec des droits différents

(je précise que c'est le patron qui me l'a demandé )

Je voudrais savoir si Excel gère les multi-users et dans ce cas comment on fait ou bien est-ce qu'il faut tout développer en VBA.

Je voudrais savoir si on peut déposé du code pour la communauté, Administrateur et modérateurs veuillez me répondre s'il vous plait

et si quelqu'un a développé un truc du même genre cela m'interesse.

merci à tous

[Igloobel]

Merci je connaisssait pas.

Je suppose que l'on met ce code dans :

Private Sub Worksheet_activate()

Si on le met ailleurs merci de me le signaler.

Bon je vais tester cela et je reviendrais en cas de pepin 8)

Merci encore

[Igloobel]

Salut ouskel'n'or,

Bon j'ai utilisé .UserName mais il doit y avoir autre chose parce j'ai un problème.

J'ai fais comme tu ma dis :

Code :

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

1
2
3
4
5
6
7
Sub Workbook_Open()
    With Application
        MonUserActif = .UserName
    End With
    MsgBox "Current user is : " & MonUserActif
 
End Sub

et j'ai comme réponse Current user is : * : : :

Sachant que je me suis connecter au démarrage sur le réseau de l'entreprise avec un nom user et un mot de passe le : "*" ne m'aide pas beaucoup.
Je suis allé voir l'aide incluse à Excel de microsoft qui est très pauvre sur ce point précis.

j'ai essayer ceci aussi :

Code :

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

MsgBox "Current user is : " & Application.UserName

mais c'est pareil
Sachant qu'après je voudrai faire un select case suivant la valeur de : "MonUserActif",

Un petit coup de main serai grandement apprécié.

Merci d'avance

[Theocourant]

Salut,

Je ne vois pas le problème car lorsque j'utilise le code de ouskel'n'or, cela me donne bien le bon nom d'utilisateur .....

Regarde au niveau de la lisence à quel nom elle est cela peut peut-être venir de là.

J'espère que tu trouveras une solution

Bon courage

Théo

[Igloobel]

Bien vu

Effectivement le nom de l'utilisateur est : *

Donc le code fonctionne bien merci. (je suis arrivé depuis peu et j'avais pas encore remarqué. )

Mais au vu de ce que je vois j'ai donc l'impression que c'est lié au poste, ou plus exactement à la licence qui se trouve sur le poste. Or ces nom de licence sont encore plus étonnant que mon etoile (je viens de verifier) et chez moi les postes ne sont pas forcement dédier à une personne...

J'ai pensé (oui ça m'arrive quelque fois) à utiliser un userforms de récupérer un nom user + un mot de passe et en fonction du résultat de mettre en oeuvre mes autorisation sur les feuilles.

Est-ce que d'après vous cela résoudrai mon pbl et est-ce suffisamment sécurisé :

J'ai peut-être pas pensé à des astuces et si vous en avez, ou même seulement un avis, je suis curieux de les connaître.

Merci d'avance

[Igloobel]

WHAOU

Si j'ai bien compris tu cryptes son code et tu le planques dans ton code VBA ?
Si c'est ça c'est hyper puissant !
Jamais vu ni entendu un truc pareil, mais bon je suis un simple autodidacte de la programmation VBA avec quelques notions d'objets.

Alors s'il te plait Ouskel'n'or je ne te demande pas ta formule miracle de cryptage, mais peux-tu m'explique ce que fait ta deuxième ligne de code :

Code :

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

Application.VBE.CodePanes(2).CodeModule.ReplaceLine 25, msg

CodePanes : c'est quoi et pourquoi tu mets 2
CodeModule : ça sert à quoi
ReplaceLine 25, msg : ça j'ai compris, en ligne 25 tu place ton code crypté qui se trouve dans msg

Même l'aide d'Excel ne ma pas permis de comprendre : les explications sont vraiement très succintes


Excuses moi de te déranger pour des choses qui peuvent te paraître simple mais j'ai des centaines de points d'interrogation qui se bouscule dans ma tête Et puis si j'ai mal compris si cela ne fait pas ce que je crois que cela fait peux-tu me ré-expliquer ?

Merci d'avance pour ta gentillesse et ton expertise