Reconnaitre l'utilisateur par EXCEL

[Wyrgle]

Bonjour,

Tout, ou presque, est deja dans le titre : je cherche a faire reconnaitre les utilisateurs d'un fihciers en partage (shared) par excel.
Nous avons des noms d'utilisateurs du type v123456.

Y a-t-il un moyen de faire cela ?
Et si oui, comment empecher les utilisateurs dt les noms ne sont pas listés de rentrer dans le fichier ? (ou tout du moins avertir par un pop-up dans XLS qu'il n'a pas la permission d'utiliser le fichier)

Merci pour votre aide.
Wyrgle

 

[Dranreb]

Re : Reconnaitre l'utilisateur par EXCEL

Bonjour Il y a Application.UserName

UserName, propriété

Renvoie ou définit le nom de l'utilisateur actuel. Type de données String en lecture-écriture.

Cordialement.

 

[Efgé]

Re : Reconnaitre l'utilisateur par EXCEL

Bonjour Wyrgle, Dranreb,
Une proposition, assez radicale, à mettre dans le ThisWorkBook:

Private Sub Workbook_Open()
Liste = "VXXXX,ZXXXX,"
If InStr(Liste, UCase(Application.UserName) & ",") = 0 Then
    MsgBox "Vous ne pouvez utiliser ce classeur"
    ThisWorkbook.Close False
End If
End Sub

Cordialement

 

[job75]

Re : Reconnaitre l'utilisateur par EXCEL

Bonjour,

Application.UserName est le nom utilisateur Excel, facilement modifiable.

Il vaut mieux utiliser Environ("Username") qui donne le nom utilisateur Windows.

Si Utilisateurs est le nom de la plage où sont nommés les autorisés, mettre dans ThisWorkbook :

Private Sub Workbook_Open()
Dim nom As String
nom = Environ("Username")
If Application.CountIf([Utilisateurs], nom) = 0 Then
  MsgBox "Vous n'avez pas la permission d'utiliser le fichier !", 48
  Me.Saved = True
  If Workbooks.Count > 1 Then Me.Close Else Application.Quit
End If
End Sub

A+

 

[Wyrgle]

Re : Reconnaitre l'utilisateur par EXCEL

Merci beaucoup pour vos idees, je vais voir comment ca marche dans mon fichier.
Wyrgle

 

[Compte Supprimé 979]

Re : Reconnaitre l'utilisateur par EXCEL

Bonsoir,

Juste une petite info comme ça, rien n'empèchera l'utilisateur de bloquer les macros à l'ouverture

A+

 

[job75]

Re : Reconnaitre l'utilisateur par EXCEL

Bonjour Bruno 🙂

Juste une petite info comme ça, rien n'empèchera l'utilisateur de bloquer les macros à l'ouverture

Problème classique des protections Excel...

A Wyrgle de savoir ce qu'il fait. Point.

L'important n'est-il pas de répondre au problème posé en faisant de belles petites macros ?

A+

 

[Compte Supprimé 979]

Re : Reconnaitre l'utilisateur par EXCEL

Salut Job75 😉

L'important n'est-il pas de répondre au problème posé en faisant de belles petites macros ?

Tout à fait mon cher ami 😉
C'était juste pour le prévenir ...

Mes amitiés

 

[Wyrgle]

Re : Reconnaitre l'utilisateur par EXCEL

Merci pour vos avertissements, j'en prends bonne note.
D'ailleurs ils s'agit d'avertir gentiment mon equipe qu'une personne d'une autre equipe trifouille dans nos fichiers xls...curiosite quand tu nous tiens.

Cordialement.
Wyrgle