3
Thanks

A few words of thanks would be greatly appreciated.

Excel - A macro to perform the automatic numbering of invoices

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


How to do it

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


Foto: © Everypixel
3
Thanks

A few words of thanks would be greatly appreciated.

Ask a question
CCM is a leading international tech website. Our content is written in collaboration with IT experts, under the direction of Jean-François Pillou, founder of CCM.net. CCM reaches more than 50 million unique visitors per month and is available in 11 languages.

Related

This document, titled « Excel - A macro to perform the automatic numbering of invoices », is available under the Creative Commons license. Any copy, reuse, or modification of the content should be sufficiently credited to CCM (ccm.net).