Increment Cell Value

This extremely simple macro increments the value in a cell. You could use this for unique id's on invoices, delivery notes, etc...

Sub Increment()
   ' change A1 to the cell you wish to increment
   Range("A1").Value = Range("A1").Value + 1
End Sub

You might also like...


Neil Derek


Why not write for us? Or you could submit an event or a user group in your area. Alternatively just tell us what you think!

Our tools

We've got automatic conversion tools to convert C# to VB.NET, VB.NET to C#. Also you can compress javascript and compress css and generate sql connection strings.

“Weeks of coding can save you hours of planning.”