View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Ron de Bruin Ron de Bruin is offline
external usenet poster
 
Posts: 11,123
Default Footer : Last saved date

Hi Ajit

You can use this
If the file is not saved it have no path


If Len(ThisWorkbook.Path) = 0 then

.......

Else

.......

End if


--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ajit" wrote in message ...
Problem : I have xlt template. When a user opens by double clicking the
template it creates xls.

What i want is that if xls is not yet saved then footer should print todays
date and time. but if xls is saved and being accessed later then it should
print the last saved time.

What i did : on workbook_beforeprint i wrote the following :-

Application.Volatile
ActiveSheet.PageSetup.LeftFooter=_
ThisWorkbook.BuiltinDocumentProperties("Last Save Date")

It works fine if the xls has been saved once but if it is not yet saved then
it prints the last saved date of the template and not the xls created.
--
Ajit