VBA ouverture excel avec login et mdp windows

Monty -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je travaille sur un fichier Excel et je souhaiterais que à l'ouverture du fichier, on puisse se connecter avec le login et le mot de passe de la session Windows et que en fonction du login, soit on a accès à tous les onglets en modif ou seulement en lecture seule

Merci d'avance pour votre aide

A voir également:

2 réponses

JuanLucas38 Messages postés 59 Statut Membre 4
 
Il me semble que le nom de l'utilisateur est affiché en haut à droite lorsqu'on utilise un logiciel de la suite office.
Vérifies si c'est ton cas, dans ce cas il y a peut être un moyen.
0
Monty
 
en fait je me suis mal exprimé, il y aura plusieurs utilisateurs et il faut que chacun puisse se connecter avec son propre login
0
JuanLucas38 Messages postés 59 Statut Membre 4 > Monty
 
Est-ce que tous les utilisateurs utiliseront la même session windows ?

Si oui dans ce cas il faudra créer ta propre macro de connexion à Excel. C'est faisable mais tout dépend quel niveau de sécurité te veux mettre. Si c'est un simple mot de passe et que les utilisateurs ne sont pas trop "poussés" cela devrait largement suffire par contre si tu as a faire à des "passionnés" il va falloir créer ton propre cryptage de mot de passe et la ce n'est plus la même affaire.
0
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 318
 
Bonjour

pour connaitre qui ouvre le classeur sur le serveur

Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _
(ByVal lpBuffer As String, nSize As Long) As Long
'---------------------------------------------
sub xxxx()
Dim lpBuff As String * 25
Dim retour As Long
Dim utilisateur As String

retour = GetUserName(lpBuff, 25)
utilisateur = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1)

.... etc


en général, on attribue plut^t un mot de passe par utilisateur dans l'active directory du serveur qu'un mot de passe windows (ce qui permet de modifier la liste des "autorisés")
0