Renseignements de session windows

Bonsoir , j'ai trouvé un code pouvant enregistrer les noms de l'ordinateur et utilisateur ayant ouvert un classeur excel.

Pourrait on enregistrer aussi le mot de passe de l'utilisateur ?

w.Cells(Rw, 1).Offset(0, 1) = Now
w.Cells(Rw, 1).Offset(0, 2) = Environ("username")
w.Cells(Rw, 1).Offset(0, 3) = Environ("computername")
[color=#FF0000]w.Cells(Rw, 1).Offset(0, 4) = Environ("mot de passe")[/color]

Merci pour votre aide

Bonjour , je vous met le code complet :

Private Sub Workbook_Open()

On Error Resume Next

            Dim Rw&, w As Worksheet, s%
            Set w = Worksheets("evenement")
            Rw = w.Cells(Rows.Count, 1).End(xlUp).Row
            If Rw < 90 Then Rw = 90
            w.Cells(Rw, 1).Offset(1, 0) = Now
            For s = 2 To Worksheets.Count ' on masque les feuilles
                Worksheets(s).Visible = True
            Next s
            w.Visible = xlVeryHidden

end sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

Application.ScreenUpdating = False

On Error Resume Next
 Dim Rw&, w As Worksheet, s%
Set w = Worksheets("evenement")
Rw = w.Cells(Rows.Count, 1).End(xlUp).Row
If Rw < 90 Then Rw = 90

w.Cells(Rw, 1).Offset(0, 1) = Now
w.Cells(Rw, 1).Offset(0, 2) = Environ("username")
w.Cells(Rw, 1).Offset(0, 3) = Environ("computername")
w.Cells(Rw, 1).Offset(0, 4) = Environ("password")

w.Visible = xlVeryHidden
'For s = 2 To Worksheets.Count ' on masque les feuilles
 Worksheets(s).Visible = xlVeryHidden

Application.ScreenUpdating = True

End Sub

Je voudrais aussi savoir en offset 5 si le classeur à été copié et en offset 6 s'il à été renommé.

J'aimerais bien trouver l'utilisateur qui me trafique mon classeur .

Merci à vous pour vos conseils

Bonjour,

Si tu cherches "juste" à savoir, qui te modifie ton classeur, la variable d'environnement username te suffit non ?

Je ne sais pas si le même genre de variable pour le mot de passe existe (je ne pense pas, le mot de passe doit être crypté dans un fichier quelconque ou dans la base de registre) et même si c'était le cas, ce n'est pas quelque chose que les membres te donneront (enfin moi je ne le ferais pas pour ma part, si j'avais la réponse), ou du moins pas sur le forum directement sur une page visible de tous sur le net, car cela pourrait être utilisé à mauvais escient.

Après si tu as réussis à récupérer l'username, à l'ouverture du fichier, tu peux détecter cet username et refermer automatiquement le classeur, tu verras bien qui viens te demander si tu sais pourquoi le fichier "bug".

Cordialement,

Rechercher des sujets similaires à "renseignements session windows"