ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   Recalculate cell with UDF (https://www.excelbanter.com/excel-worksheet-functions/11771-recalculate-cell-udf.html)

Numfric

Recalculate cell with UDF
 
I have a cell with the following contents:
=CONCATENATE("Last updated ",TEXT(LastSaved(), "mmmm dd, yyyy"))

LastSaved is a UDF with the following definition:

Public Function LastSaved()
LastSaved = ActiveWorkbook.BuiltinDocumentProperties("Last Save Time")
End Function

I have automatic recalc turned on. If I save the workbook, exit and bring
it up again, the cell value still shows the previous last saved date. If I
F2 on the cell and press Enter, the date is refreshed with the current date.
What's going on?

Arvi Laanemets

Hi

Try this:
=IF(NOW()0,"Last updated " & TEXT(LastSaved(), "mmmm dd, yyyy"))

Arvi Laanemets


"Numfric" wrote in message
...
I have a cell with the following contents:
=CONCATENATE("Last updated ",TEXT(LastSaved(), "mmmm dd, yyyy"))

LastSaved is a UDF with the following definition:

Public Function LastSaved()
LastSaved = ActiveWorkbook.BuiltinDocumentProperties("Last Save Time")
End Function

I have automatic recalc turned on. If I save the workbook, exit and bring
it up again, the cell value still shows the previous last saved date. If

I
F2 on the cell and press Enter, the date is refreshed with the current

date.
What's going on?




Oliver Ferns via OfficeKB.com

Try putting

Application.Volatile True

In your UDF.

Hth,
Oli

--
Message posted via http://www.officekb.com

Numfric

Thank you both for your responses. Both methods work. I went with
Application.Volatile (True is implied), as there is less clutter in the cell.

"Oliver Ferns via OfficeKB.com" wrote:

Try putting

Application.Volatile True

In your UDF.

Hth,
Oli

--
Message posted via http://www.officekb.com



All times are GMT +1. The time now is 06:08 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com