"Nom" de la personne ayant effectué le dernier enregistrement

Bonjour
MsgBox ThisWorkbook.BuiltinDocumentProperties("Last Author")
Cordialement
Pascal

Bonjour,

Une piste avec le code suivant

''*******************
Sub aa()
Dim DP As DocumentProperty
For Each DP In ActiveWorkbook.BuiltinDocumentProperties
MsgBox DP.Name
Next DP
End Sub
''*******************

Cordialement.

PMO
Patrick Morange

Bonjour !
Y a-t-il un quelconque moyen de récupérer par macro le "nom" de la personne
ayant enregistré un fichier en dernier ? En gros, j'aimerai pouvoir récupérer
dans les propriétés du classeur, l'info "dernier enregistrement par" (onglet
Statistiques des Propriétés d'un classeur depuis le menu Fichier/Propriétés)
Merci d'avance.

--
A+

V.

Bonjour,


http://cjoint.com/?dDrmJ7noxy

Enregistre le nom du dernier utilisateur (nom User réseau local)dans
l'onglet Dernier_utilisateur:

Evénement BeforeSave de ThisWorkBook

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Sheets("dernier_utilisateur").Range("a1") = GetUserName()
Sheets("dernier_utilisateur").Range("a2") = Now
End Sub

Cordialement JB