SETUP AUTO SEQUENCE

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

What is the simplest way to set up sequential invoice numbers in a workbook?
I have 35 Invoices. Instead of typing the Invoice number on every
invoice/sheet, can I automate the invoice numbers to start at #1310 and
increase by 1 for each invoice/sheet? (The Invoice number must be on each
sheet)
 
One possibility:
Start sheet one with invoice 1310 in cell A1 (or whatever). On the
next sheet, refer to that cell A1 and add 1 with a formula such as
=Sheet1!A1+1 and continue for remaining sheets.
 
It isn't working...can you explain step by step (just do 2nd sheet. I can
figure out how to apply to the rest.
 
Steve

A macro will do?

Sub Number_Increment()
Dim myNum As Long
Dim iCtr As Long
myNum = 1310
For iCtr = 1 To Worksheets.Count
With Worksheets(iCtr).Range("A1")
.Value = myNum - 1 + iCtr
End With
Next iCtr
End Sub


Gord Dibben MS Excel MVP
 
Back
Top