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
Please email me if possible
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.
You may interest in:
Office Tab: Bring powerful tabs to Office (include Excel), just like Chrome, Safari, Firefox and Internet Explorer. Save you half the time, and reduce thousands of mouse clicks for you. 30-day Unlimited Free Trial
Kutools for Excel: Save 71% of your time and solve 82% Excel problems for you. 300+ advanced tools designed for 1500+ work scenario, make Excel much easy and increase productivity immediately.60-day Unlimited Free Trial
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 higher version
If you are using Microsoft Excel 2010 or higher 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.
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:
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.
1. Click Enterprise > 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.