Tom,

If ReceiptNo is a named range, use code like

Range("ReceiptNo").Value = Range("ReceiptNo").Value + 1


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Tom" wrote in message
...
Hi,

Can any one tell me how to do the simple task of having a
receipt number increment automatically in VB code? I
thought that it was as easy as something like:

ReceiptNo = ReceiptNo + 1


Where ReceiptNo is the name of the range where the number
is to appear. However this does not seem to work!

Help would be appreciated.

Tom