automatically increment numbers every time you open the same template MSO 2013

[Dotcommz]

In Microsoft Excel 2013, I have a spreadsheet that I want to use that each time I open it, I want it to autonumber a specific cell. I want to start off using 0001 and when the spreadsheet is opened a second time, I want it to go to 0002. Is there a way to get this to occur? The sheet is saved as .xlsm if this matters.

[alansidman]

Put this code in the Workbook Open Event in the VBE. Assume the range to update is A1. Change as needed.

Please Login or Register  to view this content.

[Dotcommz]

Thanks Alan, works like a charm

[YasserKhalil]

Hi Dotcommz
Try this code in ThisWorkbook module

Please Login or Register  to view this content.

[Dotcommz]

Thanks Yasser, but Alans solution worked fine.

[alansidman]

If that takes care of your original question, please select Thread Tools from the menu link above and mark this thread as SOLVED. Thanks.

[YasserKhalil]

Hi Dotcommz
In fact I didn't see Mr. Alan's post at first. I was working on it. It is the same approach. Just I added the format to the target cell as you need 0001 and so on
Generall I am glad you find solution
Thanks for the feedback.