Thanks Gord,

That's very close what I wanted. Thanks for your help.

Rgds,
Kevin

"Gord Dibben" wrote:

Kevin

By "open a new document" do you mean based on a Template(*.xlt)?

If so, you can put code in the Template Thisworkbook module that sticks a static
date into a cell when a new document is created from the Template.

Private Sub Workbook_Open()
With ActiveSheet.Range("A1")
If .Value = "" Then
.Value = Format(Now, "ddmmmyy")
End If
End With
End Sub

When you subsequently open the saved document if the date is in A1 it will not
change.


Gord Dibben MS Excel MVP


On Mon, 1 Jan 2007 01:54:00 -0800, Kevin
wrote:

Hi David,
That's what I'm doing at the moment but I like to automate the process so
that whenever I open a new document date is already there.
Thanks
Kevin

"David Biddulph" wrote:

Instead of =TODAY() you could use Control semicolon to insert the date.
--
David Biddulph

"Kevin" wrote in message
...
Hi,
I'm trying to create an Excel form to generate a quotation for my
customers.
I like to have quotation number extracted from today's date e.g. if I
generate quote on 30Dec06 then prefix of quote number could be 301206-xx

I have tried to use =TODAY() date function but everytime I open excel file
it changes to today's date.

Is there any way I can extract the contents of today's date and paste them
in a cell and once pasted should never change.

Thanks in advance.
Regards,
Kevin
kksmith67 at yahoo.com