Placing Date in footer

I have the date in the footer of a page which is expressed as "& [Date]" which gives me a simple date. But I want the date to be formatted to show Day, Date, Time such as:

Friday, September 14, 2007 8:32 PM

I think I can do this via some VBA formatting code, but I don't know how - can anyone help?

I guess I don't know how to enter your code correctly. It appears to have no effect.

Let me ask the question in a different way -

I have a cell in the spreadsheet that uses the function Now(). That cell has a custom format of dddd m/d/yyyy h:mm AM/PM. This causes the cell to display :

Sunday 9/16/2007 8:44 AM

Is there anyway that I can get the content and format of this cell into the footer? I want to show the day of the week as well as the date and time.

Hi there Mike,

Enter the following code in the "ThisWorkbook" VBA module of your workbook:

Please Login or Register  to view this content.

This will put the required information & format in the centre footer of each worksheet in your workbook.

Hope this helps - please let me know how you get on.

Best regards,

Greg M

Hi guys. Thanks for thehelp but I guess there's something that I'm missing. It still does not work, even though it looks to me like it should. Attached is a test sheet that should show what I've done. What am I doing wrong?