I tried this, but it did not work.

Any other ideas?

"Kassie" wrote:

In your workbook open event, insert code to increment the number
I normally read the cell's value into a variable, then increment the number
on pasting it back to the sheet.

Something like

vNumber = Range("your nr cell").value
Range("your nr cell")= vNumber+1
ActiveWorkbook.save

--
HTH

Kassie

Replace xxx with hotmail


"Adam" wrote:

I have created a sales sheet template in excel 2003 and would like it to
generate a unique number every time it is opened. the file would then be
saved as a new name, but when you reopened the template it put the next
number in.

any help would be appreciated