Skip to main content

How to get and insert the last modified user name in Excel?

This article will show you the way to get the last modified user name information, and insert the last modified user name information in cells in Excel.

Get the last modified user name of current workbook in Excel
Insert the last modified user name of current workbook with User-defined function
Easily insert the user name in cell, header or footer with Kutools for Excel


Get the last modified user name of current workbook in Excel

As we know, we can get the last modified user name information in Advanced Properties dialog box of current workbook.

If you are using Excel 2007

You can get the user name who modified current workbook last time in Excel with following steps:

Step 1: Click the Office Button >> Prepare >> Properties.

Step 2: Then the Document Pane is added above worksheet. Click the Document Properties >> Advanced properties.

Step 3: In the popping up Advanced Properties dialog box, you will see the Last Saved by: information under the Statistics tab.

If you are using Excel 2010, 2013 or later version

If you are using Microsoft Excel 2010 or later version, you can get the last modified user information with following steps:

Just click the File > Info, you will get the Last Modified by information at right side under Related People section. See the following screen shot.


Insert the user name who modified current workbook last time with User-defined function

1: Hold down the ALT + F11 keys to open the Microsoft Visual Basic for Applications window.

2: In the Microsoft Visual Basic for Applications window, click Insert > Module, and paste the following macro in the Module Window. See screenshotL

VBA code: Insert last modified user name in Excel

Function LastAuthor()
LastAuthor = ActiveWorkbook.BuiltinDocumentProperties("Last Author")
End Function

3: Press the Alt + Q keys to close the Microsoft Visual Basic for Applications window.

4. Select a cell you need to place the user name, enter formula =LastAuthor() into the Formula Bar, and then press the Enter key. Then the last modified user name is inserted into the cell immediately. See screenshot:


Easily insert the user name in cell, header or footer with Kutools for Excel

You can easily insert user name in specified cell, worksheet header or footer in Excel with the Insert Workbook Information utility of Kutools for Excel. Please do as follows.

Before applying Kutools for Excel, please download and install it firstly.

1. Click Kutools Plus > Workbook > Insert Workbook Information. See screenshot:

2. In the Insert Workbook Information dialog box, you need to:

1). Select the User name option in the Information section.

2). If you want to insert the user name into a specified cell, please specify this cell in the Range box; for inserting user name into the header or footer, please select the Header or Footer option.

3). Click the Ok button. See screenshot:

Then the user name will be inserted into the specified position immediately.

  If you want to have a free trial (30-day) of this utility, please click to download it, and then go to apply the operation according above steps.

Best Office Productivity Tools

🤖 Kutools AI Aide: Revolutionize data analysis based on: Intelligent Execution   |  Generate Code  |  Create Custom Formulas  |  Analyze Data and Generate Charts  |  Invoke Kutools Functions…
Popular Features: Find, Highlight or Identify Duplicates   |  Delete Blank Rows   |  Combine Columns or Cells without Losing Data   |   Round without Formula ...
Super Lookup: Multiple Criteria VLookup    Multiple Value VLookup  |   VLookup Across Multiple Sheets   |   Fuzzy Lookup ....
Advanced Drop-down List: Quickly Create Drop Down List   |  Dependent Drop Down List   |  Multi-select Drop Down List ....
Column Manager: Add a Specific Number of Columns  |  Move Columns  |  Toggle Visibility Status of Hidden Columns  |  Compare Ranges & Columns ...
Featured Features: Grid Focus   |  Design View   |   Big Formula Bar    Workbook & Sheet Manager   |  Resource Library (Auto Text)   |  Date Picker   |  Combine Worksheets   |  Encrypt/Decrypt Cells    Send Emails by List   |  Super Filter   |   Special Filter (filter bold/italic/strikethrough...) ...
Top 15 Toolsets12 Text Tools (Add Text, Remove Characters, ...)   |   50+ Chart Types (Gantt Chart, ...)   |   40+ Practical Formulas (Calculate age based on birthday, ...)   |   19 Insertion Tools (Insert QR Code, Insert Picture from Path, ...)   |   12 Conversion Tools (Numbers to Words, Currency Conversion, ...)   |   7 Merge & Split Tools (Advanced Combine Rows, Split Cells, ...)   |   ... and more

Supercharge Your Excel Skills with Kutools for Excel, and Experience Efficiency Like Never Before. Kutools for Excel Offers Over 300 Advanced Features to Boost Productivity and Save Time.  Click Here to Get The Feature You Need The Most...

Description


Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier

  • Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
  • Open and create multiple documents in new tabs of the same window, rather than in new windows.
  • Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
Comments (16)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How can the Activeworkbook be dynamic?

I tried to no success the below code

LastSavedby = Range("A1").value.BuiltinDocumentProperties("Last Author")

Where in A1 contains the path of the file with the file name and extension
This comment was minimized by the moderator on the site
Hi! I, my case it doesn't work automatically, I need to press "enter" after the formula "= VBAProject.Module3.LastAuthor()".
How should i make it automatic?
Thank you
This comment was minimized by the moderator on the site
Hey, this code worked nicely. Is there a way I can display the user name if a ROW is adjusted? For example, I hhave Column K with the header "Last modified By", and I want to know who adjusted "each row" as this is a shared document. I have the below code for Date, which works like how I would want the name to work: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column > 11 Or Target.Row = 1 Then Exit Sub Application.EnableEvents = False Cells(Target.Row, 12) = Now Application.EnableEvents = True End Sub Please email me if possible
This comment was minimized by the moderator on the site
Hi. I would like to ask how to write the VBA codes to retrieve all current users which modifying on the worksheet. Thank You:)
This comment was minimized by the moderator on the site
thanks a lot for this helpful article. I used it and it worked well. can I get the last modified date on that sheet just like the username ? MANY THANKS
This comment was minimized by the moderator on the site
Can u pls help if iwant the user name to appear in aspreadsheet as and when the previous cell is filled by a user
This comment was minimized by the moderator on the site
Thanks, Cp & Jay Chivo :)
This comment was minimized by the moderator on the site
Sub UserName() Sheets("Sheet1").Range("A1").Value = Environ("username") End Sub --------------- Change the sheet name
This comment was minimized by the moderator on the site
I am runing excel 2007 and am getting the runtime error 9, script out of range as well. any way to make it work in excel 2007?
This comment was minimized by the moderator on the site
Excel 2010. Same time i would like to ask that is it possible to use this Subscript with another function script ? Thanks Naghman
This comment was minimized by the moderator on the site
[quote]Excel 2010. Same time i would like to ask that is it possible to use this Subscript with another function script ? Thanks NaghmanBy Naghman[/quote] With another script? What script? :-)
This comment was minimized by the moderator on the site
To get last saved date. Function LastSaveDate() Application.Volatile True LastSaveDate = FileDateTime(ThisWorkbook.FullName) End Function
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
Rate this post:
0   Characters
Suggested Locations