Forum Discussion
Jon_Big
Sep 07, 2023Copper Contributor
Automatically adding a timestamp after a pulldown is selected
I have been trying to research this myself and I thought I found the solution, but I am still stuck. I have a spreadsheet that has several columns with pull down menus for example Column P. Next to...
HansVogelaar
Sep 08, 2023MVP
The code should be in the worksheet module. You can open this module from Excel by right-clicking the sheet tab, then selecting 'View Code' from the context menu, or by double-clicking the sheet in the Project Explorer pane of the Visual Basic Editor.
I'd change the code to look like this:
Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("P2:P670")) Is Nothing Then
Application.ScreenUpdating = False
Application.EnableEvents = False
Intersect(Target, Range("P2:P670")).Offset(1, 0).Value = Now
Application.EnableEvents = True
Application.ScreenUpdating = True
End If
End Sub
- Jon_BigSep 08, 2023Copper Contributor
Thanks for the advice, but I am still missing something. I have your code in the correct worksheet, vs the module or workbook. (See photo) But, when I select something from the pull down menu in Column P, I still get nothing in the next column (See [photo)
What am I missing? Does it have something to do with the pull down menu's?
- HansVogelaarSep 08, 2023MVP
Since you didn't include the column headers in the screenshot, I cannot see which cells are involved.
- Jon_BigSep 08, 2023Copper ContributorSorry, the Rev Req Y/n is Column P, and the Review decision date is column Q. Column P is a pulldown to select yes or no. I need the date to show up next to it in Column Q when something is selected.
This is the first set of columns I am doing this for. I have other columns with pull down menus that have more options and I need it to record the date and time each time a new option is selected.
Thanks.