Hi,
I have created a Invoice in Excel from my Office 2000, and saved it as an
Excel template, I have a invoice number in Cell E14 which is 16 at this time,
I want this number to be automaticaly increased by 1 each time I open the
Template. Is this possible? If it is some very basic simple to follow
instructions on how to do it would be most helpful
Many thanks
Andy JL

Try this in the workbook object

Private Sub Workbook_Open()
Sheet1.Range("E14").Value = Sheet1.Range("E14").Value + 1
End Sub

Sandy

"Andy JL" wrote in message
...
Hi,
I have created a Invoice in Excel from my Office 2000, and saved it as an
Excel template, I have a invoice number in Cell E14 which is 16 at this
time,
I want this number to be automaticaly increased by 1 each time I open the
Template. Is this possible? If it is some very basic simple to follow
instructions on how to do it would be most helpful
Many thanks
Andy JL

Sandy,

Thank you very much that work great. Very easy when you know how..

Andy JL

"Sandy" wrote:

Try this in the workbook object

Private Sub Workbook_Open()
Sheet1.Range("E14").Value = Sheet1.Range("E14").Value + 1
End Sub

Sandy

"Andy JL" wrote in message
...
Hi,
I have created a Invoice in Excel from my Office 2000, and saved it as an
Excel template, I have a invoice number in Cell E14 which is 16 at this
time,
I want this number to be automaticaly increased by 1 each time I open the
Template. Is this possible? If it is some very basic simple to follow
instructions on how to do it would be most helpful
Many thanks
Andy JL

Sandy -
Is there any way that I can link the invoice No. in E14 so that the workbook
No. reads "invoice (with the same number & same date as in E16)

Thanks again for your previous quick response
Andy JL

"Sandy" wrote:

Try this in the workbook object

Private Sub Workbook_Open()
Sheet1.Range("E14").Value = Sheet1.Range("E14").Value + 1
End Sub

Sandy

"Andy JL" wrote in message
...
Hi,
I have created a Invoice in Excel from my Office 2000, and saved it as an
Excel template, I have a invoice number in Cell E14 which is 16 at this
time,
I want this number to be automaticaly increased by 1 each time I open the
Template. Is this possible? If it is some very basic simple to follow
instructions on how to do it would be most helpful
Many thanks
Andy JL

Hi AndyJL

Don't know what you have in cell E16 but if i'm guessing right then I think
you mean something like "Invoice No 16 - Sat, Nov 19, 2005" in a cell. In
which case type
="Invoice No "&E14& " - "&TEXT(E16,"ddd, mmm d, yyyy") in whichever cell
you fancy. E14 being your invoice no and E16 being the date(?). Adjust to
suit.
Sandy

"Andy JL" wrote in message
...
Sandy -
Is there any way that I can link the invoice No. in E14 so that the
workbook
No. reads "invoice (with the same number & same date as in E16)

Thanks again for your previous quick response
Andy JL

"Sandy" wrote:

Try this in the workbook object

Private Sub Workbook_Open()
Sheet1.Range("E14").Value = Sheet1.Range("E14").Value + 1
End Sub

Sandy

"Andy JL" wrote in message
...
Hi,
I have created a Invoice in Excel from my Office 2000, and saved it as
an
Excel template, I have a invoice number in Cell E14 which is 16 at this
time,
I want this number to be automaticaly increased by 1 each time I open
the
Template. Is this possible? If it is some very basic simple to follow
instructions on how to do it would be most helpful
Many thanks
Andy JL

http://www.mcgimpsey.com/excel/udfs/sequentialnums.html


--

Regards,

Peo Sjoblom


"Andy JL" wrote in message
...
Hi,
I have created a Invoice in Excel from my Office 2000, and saved it as an
Excel template, I have a invoice number in Cell E14 which is 16 at this
time,
I want this number to be automaticaly increased by 1 each time I open the
Template. Is this possible? If it is some very basic simple to follow
instructions on how to do it would be most helpful
Many thanks
Andy JL