Hi alvin

You can format the cell like this
Ctrl-1
Numbercustom
Type : Enter 0000 there

In a macro you can use this

With Sheets("sheet1").Range("A1")
..Value = .Value + 1
End With



--
Regards Ron de Bruin
http://www.rondebruin.nl


"Alvin Hansen" wrote in message ...
Hi!!
I shall make this form, and in this form
i shall use a number like a ID there every
time i start this form i get a new number
like if the last number i use was 0098 then
i get 0099 when i start the form. And when
i save the file the file name shal bee the number
i just get like 0099. hope someone can help how to do this

Best regards

Alvin