Does anyone know of a way to insert the last save date and time in a cell in
an Excel worksheet?

Mickey

You could use a workbook_Beforesave() event, like so

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Worksheets("Sheet1").Range("A1").Value = Now()
End Sub

To get into workbook, right-click the workbook excel icon second down top
left and select view code, paste here

Change worksheet and cell ref to suit

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
DTHIS
www.nickhodge.co.uk


"mickey" wrote in message
...
Does anyone know of a way to insert the last save date and time in a cell
in
an Excel worksheet?

Thanks Nick

"Nick Hodge" wrote:

Mickey

You could use a workbook_Beforesave() event, like so

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Worksheets("Sheet1").Range("A1").Value = Now()
End Sub

To get into workbook, right-click the workbook excel icon second down top
left and select view code, paste here

Change worksheet and cell ref to suit

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
DTHIS
www.nickhodge.co.uk


"mickey" wrote in message
...
Does anyone know of a way to insert the last save date and time in a cell
in
an Excel worksheet?

Pleasure

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
DTHIS
www.nickhodge.co.uk


"mickey" wrote in message
...
Thanks Nick

"Nick Hodge" wrote:

Mickey

You could use a workbook_Beforesave() event, like so

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)
Worksheets("Sheet1").Range("A1").Value = Now()
End Sub

To get into workbook, right-click the workbook excel icon second down top
left and select view code, paste here

Change worksheet and cell ref to suit

--
HTH
Nick Hodge
Microsoft MVP - Excel
Southampton, England
DTHIS
www.nickhodge.co.uk


"mickey" wrote in message
...
Does anyone know of a way to insert the last save date and time in a
cell
in
an Excel worksheet?