Save file with time date stamp
 

I have this code


Code:
--------------------

ActiveWorkbook.SaveAs Filename:="c:\t\q1\blue\save\"filename""

--------------------


I want the 'filename to be todays time and date.

How do I make this happen?


--
oberon.black
------------------------------------------------------------------------
oberon.black's Profile: http://www.excelforum.com/member.php...o&userid=26732
View this thread: http://www.excelforum.com/showthread...hreadid=469731

Save file with time date stamp
 

Hi Oberon,

Try:

Dim sStr As String

sStr = Format(Now, "yyyymmdd (hh-mm)") & ".xls"
ActiveWorkbook.SaveAs Filename:="c:\t\q1\blue\save\" & sStr

Change the date / time format to suit.

---
Regards,
Norman



"oberon.black"
wrote in message
news:oberon.black.1vqhaa_1127347510.4991@excelforu m-nospam.com...

I have this code


Code:
--------------------

ActiveWorkbook.SaveAs Filename:="c:\t\q1\blue\save\"filename""

--------------------


I want the 'filename to be todays time and date.

How do I make this happen?


--
oberon.black
------------------------------------------------------------------------
oberon.black's Profile:
http://www.excelforum.com/member.php...o&userid=26732
View this thread: http://www.excelforum.com/showthread...hreadid=469731