How to use Excel auto numbering formula

In this article we will show you an easy way of doing an automatic numbering in Excel using a MACRO.

To perform the automatic numbering of invoices in Excel:

For example, this MACRO can increment an invoice number. Here, the number is displayed in cell "A1", but it can be changed to your convenience:

Sub Increment_invoice()   
Dim num As Integer   
Range("A1").Select   
num = Range("A1").Value   
num = num + 1   
Range("A1").Value = num   
End Sub

You should also add these lines to the end of a macro so that every time you print your invoice, the next one will be incremented automatically as follows:

Sub PRINT()   
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True   
Dim num As Integer   
Range("A1").Select   
num = Range("A1").Value   
num = num + 1   
Range("A1").Value = num   
End Sub

Any more Excel questions? Check out our forum!

Subject Replies

Unable to change date format in Excel 39

How to calculate positions(1st,2nd,3rd...) in Excel 4

How to convert number into text in Excel 9

Copying data from one Excel sheet to another. 30

Convert number to spelling 28

Excel - IF function with multiple words 14

Date formatting in dd/mm/yyyy 11

If a cell contains any text then add a value 20

Automatically transfer data from one sheet to another 22

Comparing two columns of names in Excel 8