Rename a workbook to an automated name (i.e. date) with a macro

[Guest]

Hi,
I have an automated workbook that automaticly log a industrial production
line.
Theese sheets logs every equipment stop as well as the fault, and it also
logs quality checks of the product.(OPC Data Collection)
I have a macro that saves it after every update.
However, I want to automaticly rename the file to the current date at a
certain time i.e. 00:00:05, or just on a command. This would save a file for
each day of the year with the production data logged in it.
I hope anyone can help me.
Thanks

 

[john.dorn]

Hi,
I have an automated workbook that automaticly log a industrial production
line.
Theese sheets logs every equipment stop as well as the fault, and it also
logs quality checks of the product.(OPC Data Collection)
I have a macro that saves it after every update.
However, I want to automaticly rename the file to the current date at a
certain time i.e. 00:00:05, or just on a command. This would save a file for
each day of the year with the production data logged in it.
I hope anyone can help me.
Thanks

Well, to add the sheet simply use:

Sheets.Add.Name = Format(Time, "hh:mm:ss")