Automatic update of invoice numbers

D

Diamond Jones

I've created an invoice and would like the invoice number to update
automatically each tie I open it just like I've done with the date. Any
ideas?

D
 
P

Paul B

Diamond,
A simple way would be to use something like this,

Private Sub Workbook_Open()
Sheets("Sheet1").Range("A1").Value = _
Sheets("Sheet1").Range("A1").Value + 1

End Sub


For other ways to do this or if this is going to be used in a temple have a
look here
http://www.mcgimpsey.com/excel/udfs/sequentialnums.html


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003
 
Top