Indicate in a cell when a spreadsheet has been changed e.g. mailing lists

Is there a question here?

--
Don Guillett
SalesAid Software

"ludite" wrote in message
...
Indicate in a cell when a spreadsheet has been changed e.g. mailing lists

I have spreadsheets that I must keep track of when they were last edited. I
don't want the date it was opened =NOW() or =TODAY(), only if the spreadsheet
is changed. Is it possible to have that entered in a cell?
"ludite" wrote:

Indicate in a cell when a spreadsheet has been changed e.g. mailing lists

If you want an update each time ANY change is made copy paste this to the
macro module of the ThisWorkbook. Be aware that this will fire EACH time any
change is made.


Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Application.EnableEvents = False
Sheets("sheet1").Range("c4") = Date
Application.EnableEvents = True

End Sub
--
Don Guillett
SalesAid Software

"ludite" wrote in message
...
I have spreadsheets that I must keep track of when they were last edited. I
don't want the date it was opened =NOW() or =TODAY(), only if the
spreadsheet
is changed. Is it possible to have that entered in a cell?
"ludite" wrote:

Indicate in a cell when a spreadsheet has been changed e.g. mailing lists

Don
Thank you for your help. I have created the macro as you outlined below but
perhaps I need to clarify my understanding of "an update each time ANY change
is made ". I would like to be able to enter the date a spreadsheet is
updated in a cell on the sheet. Is there a function that does this?

"Don Guillett" wrote:

If you want an update each time ANY change is made copy paste this to the
macro module of the ThisWorkbook. Be aware that this will fire EACH time any
change is made.


Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Application.EnableEvents = False
Sheets("sheet1").Range("c4") = Date
Application.EnableEvents = True

End Sub
--
Don Guillett
SalesAid Software

"ludite" wrote in message
...
I have spreadsheets that I must keep track of when they were last edited. I
don't want the date it was opened =NOW() or =TODAY(), only if the
spreadsheet
is changed. Is it possible to have that entered in a cell?
"ludite" wrote:

Indicate in a cell when a spreadsheet has been changed e.g. mailing lists

Don
The macro to insert updated date in spreadsheets is working very well.
Thanks.

"ludite" wrote:

Don
Thank you for your help. I have created the macro as you outlined below but
perhaps I need to clarify my understanding of "an update each time ANY change
is made ". I would like to be able to enter the date a spreadsheet is
updated in a cell on the sheet. Is there a function that does this?

"Don Guillett" wrote:

If you want an update each time ANY change is made copy paste this to the
macro module of the ThisWorkbook. Be aware that this will fire EACH time any
change is made.


Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Application.EnableEvents = False
Sheets("sheet1").Range("c4") = Date
Application.EnableEvents = True

End Sub
--
Don Guillett
SalesAid Software

"ludite" wrote in message
...
I have spreadsheets that I must keep track of when they were last edited. I
don't want the date it was opened =NOW() or =TODAY(), only if the
spreadsheet
is changed. Is it possible to have that entered in a cell?
"ludite" wrote:

Indicate in a cell when a spreadsheet has been changed e.g. mailing lists