Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
We have a table with material prices, and would like to see at a glance, in
the next cell, when a price was last modified. |
#2
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
manx
Right-click on the sheet tab and "View Code". Copy/paste the following event code to that module. As you enter/edit prices in column A, the data/time will be stamped in column B. Private Sub Worksheet_Change(ByVal Target As Excel.Range) 'when entering data in a cell in Col A On Error GoTo enditall Application.EnableEvents = False If Target.Cells.Column = 1 Then n = Target.Row If Excel.Range("A" & n).Value < "" Then Excel.Range("B" & n).Value = Now End If End If enditall: Application.EnableEvents = True End Sub Gord Dibben MS Excel MVP On Fri, 17 Mar 2006 15:57:12 -0800, manxman wrote: We have a table with material prices, and would like to see at a glance, in the next cell, when a price was last modified. |
#3
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Typo.......should be date/time will be stamped
Gord On Sat, 18 Mar 2006 15:43:57 -0800, Gord Dibben <gorddibbATshawDOTca wrote: manx Right-click on the sheet tab and "View Code". Copy/paste the following event code to that module. As you enter/edit prices in column A, the data/time will be stamped in column B. Private Sub Worksheet_Change(ByVal Target As Excel.Range) 'when entering data in a cell in Col A On Error GoTo enditall Application.EnableEvents = False If Target.Cells.Column = 1 Then n = Target.Row If Excel.Range("A" & n).Value < "" Then Excel.Range("B" & n).Value = Now End If End If enditall: Application.EnableEvents = True End Sub Gord Dibben MS Excel MVP On Fri, 17 Mar 2006 15:57:12 -0800, manxman wrote: We have a table with material prices, and would like to see at a glance, in the next cell, when a price was last modified. Gord Dibben MS Excel MVP |
#4
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Thank you Gord, it works great.
"manxman" wrote: We have a table with material prices, and would like to see at a glance, in the next cell, when a price was last modified. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
if data in one cell, then date in adjacent cell | Excel Worksheet Functions | |||
How do I get a cell to show the day of the week when date entered | Excel Discussion (Misc queries) | |||
How do I show file creation date in a cell in Excel? | Excel Worksheet Functions | |||
Date Range within one cell | New Users to Excel | |||
enter a time into a cell, have the cell show two times the entry | Excel Worksheet Functions |