Need to insert modification date in a cell

Posted by Wilma Celiberti on April 11, 2001 12:05 PM

Hi:

I have a workbook with several sheets (sheets A, B, C, D, E, F, etc.)in Excel'97. I need this to be accomplished: When a user changes any cell in any of the following sheets: A, B, C, I need a macro that inserts the date of modification (change) in a particular cell in sheet A. If none of the sheets is modified, the date should remain the same. Thank you.

Posted by Stephane Parent on April 11, 2001 12:30 PM

Try this macro in "thisworkbook"

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Worksheets("A").Range("A1").Value = Now
End Sub

I hope it helps!

Stephane Parent