incrementing numbers

[buddie]

Can anyone give me a tip on setting up a macro that will increment
numeric cell each time it is run. i.e. an invoicing sheet that wil
print a new number each time.
probably easy heh!, I must be missing something.
Thanks in advance

 

[Arvi Laanemets]

Hi

Public Sub AddIntoA1()
Sheets("Sheet1").Range("A1").Value = Sheets("Sheet1").Range("A1").Value
+ 1
End Sub

 

[buddie]

Thankyou very much , it works
bu