Last Save Time, Function not updating in cell

[Bassman62]

Using WinXP Pro and Excel 2007;
I have the following UDF in a code module of a workbook

Function LSDate()
LSDate = Application.Caller.Parent.Parent. _
BuiltinDocumentProperties("Last Save Time").Value
End Function

Cell A1 =LSDate()
The display date and time in the cell displays correctly when first the
formula is first entered but it does not update unless I re-enter the formula.
Automatic calculation is turned on. I've tried manually recalculating the
worksheet.
I've tried closing and reopening the worksheet.
Any suggestions as to how I can get the cell to update automatically?
Thank you.

 

[Dave Peterson]

You could add a line at the top of the function:

Function LSDate()
Application.Volatile
....


And then your UDF will recalculate whenever excel recalculates. That means that
you still may need to recalc before you believe the value in that cell.

 

[Peter T]

Try this

=LSDate()+0*NOW()

Should update when the file opens Might need F9 after saving and keeping
the file open.

Regards,
Peter T

 

[Bassman62]

Thanks Dave!
It works fine now.

You could add a line at the top of the function:

Function LSDate()
Application.Volatile
....


And then your UDF will recalculate whenever excel recalculates. That means that
you still may need to recalc before you believe the value in that cell.