Invoice Numbering

Take a look at

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

In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> How can I set up automatic sequential invoice numbering across multiple
> worksheets but in the same workbood? I have all my customers set up on
> individual worksheets and would like to assign an invoice number when I
> print. Then would like the next time I print possibly a different worksheet
> to print the next number up from the previous number that was assigned to the
> last invoice.

Does this work considering my worksheets are not templates?

"JE McGimpsey" wrote:

> Take a look at
>
> http://www.mcgimpsey.com/excel/sequentialnums.html
>
> In article <[email protected]>,
> "thecashman" <[email protected]> wrote:
>
> > How can I set up automatic sequential invoice numbering across multiple
> > worksheets but in the same workbood? I have all my customers set up on
> > individual worksheets and would like to assign an invoice number when I
> > print. Then would like the next time I print possibly a different worksheet
> > to print the next number up from the previous number that was assigned to the
> > last invoice.
>

It will if you use the Workbook_BeforePrint event. For example:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim ws As Worksheet
Cancel = True
Application.EnableEvents = False
For Each ws In ActiveWindow.SelectedSheets
ws.Range("B1").Value = NextSeqNum
ws.PrintOut
Next ws
Application.EnableEvents = True
End Sub

In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> Does this work considering my worksheets are not templates?

OK, I'm not sure what is going on.....I would like to start at a value of 1
and then get the next sequential number to print in cell G3 across all
worksheets. Value to change only when an invoice is printed. But right now
with the number 1 starting in G3 and when I hit print...the value is deleted
in that worksheet only and it prints nothing. Actually its deleting any
value in that cell. Where do I put the starting number in the VBE. I'm
fairly new to this area of excel..and I only have myself to teach me..Thanks
for any help you can provide me. Or if you could provide me with the exact
macro I should insert that would be great. Thanks again

"JE McGimpsey" wrote:

> It will if you use the Workbook_BeforePrint event. For example:
>
> Private Sub Workbook_BeforePrint(Cancel As Boolean)
> Dim ws As Worksheet
> Cancel = True
> Application.EnableEvents = False
> For Each ws In ActiveWindow.SelectedSheets
> ws.Range("B1").Value = NextSeqNum
> ws.PrintOut
> Next ws
> Application.EnableEvents = True
> End Sub
>
> In article <[email protected]>,
> "thecashman" <[email protected]> wrote:
>
> > Does this work considering my worksheets are not templates?
>

The code I gave you was based on your also using the NextSeqNum macro
(placed in a regular code module), as in the example on my web page.

You can get a good introduction to macros at

http://www.mvps.org/dmcritchie/excel/getstarted.htm


In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> OK, I'm not sure what is going on.....I would like to start at a value of 1
> and then get the next sequential number to print in cell G3 across all
> worksheets. Value to change only when an invoice is printed. But right now
> with the number 1 starting in G3 and when I hit print...the value is deleted
> in that worksheet only and it prints nothing. Actually its deleting any
> value in that cell. Where do I put the starting number in the VBE. I'm
> fairly new to this area of excel..and I only have myself to teach me..Thanks
> for any help you can provide me. Or if you could provide me with the exact
> macro I should insert that would be great. Thanks again

Take a look at

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

In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> How can I set up automatic sequential invoice numbering across multiple
> worksheets but in the same workbood? I have all my customers set up on
> individual worksheets and would like to assign an invoice number when I
> print. Then would like the next time I print possibly a different worksheet
> to print the next number up from the previous number that was assigned to the
> last invoice.

Does this work considering my worksheets are not templates?

"JE McGimpsey" wrote:

> Take a look at
>
> http://www.mcgimpsey.com/excel/sequentialnums.html
>
> In article <[email protected]>,
> "thecashman" <[email protected]> wrote:
>
> > How can I set up automatic sequential invoice numbering across multiple
> > worksheets but in the same workbood? I have all my customers set up on
> > individual worksheets and would like to assign an invoice number when I
> > print. Then would like the next time I print possibly a different worksheet
> > to print the next number up from the previous number that was assigned to the
> > last invoice.
>

It will if you use the Workbook_BeforePrint event. For example:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim ws As Worksheet
Cancel = True
Application.EnableEvents = False
For Each ws In ActiveWindow.SelectedSheets
ws.Range("B1").Value = NextSeqNum
ws.PrintOut
Next ws
Application.EnableEvents = True
End Sub

In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> Does this work considering my worksheets are not templates?

OK, I'm not sure what is going on.....I would like to start at a value of 1
and then get the next sequential number to print in cell G3 across all
worksheets. Value to change only when an invoice is printed. But right now
with the number 1 starting in G3 and when I hit print...the value is deleted
in that worksheet only and it prints nothing. Actually its deleting any
value in that cell. Where do I put the starting number in the VBE. I'm
fairly new to this area of excel..and I only have myself to teach me..Thanks
for any help you can provide me. Or if you could provide me with the exact
macro I should insert that would be great. Thanks again

"JE McGimpsey" wrote:

> It will if you use the Workbook_BeforePrint event. For example:
>
> Private Sub Workbook_BeforePrint(Cancel As Boolean)
> Dim ws As Worksheet
> Cancel = True
> Application.EnableEvents = False
> For Each ws In ActiveWindow.SelectedSheets
> ws.Range("B1").Value = NextSeqNum
> ws.PrintOut
> Next ws
> Application.EnableEvents = True
> End Sub
>
> In article <[email protected]>,
> "thecashman" <[email protected]> wrote:
>
> > Does this work considering my worksheets are not templates?
>

The code I gave you was based on your also using the NextSeqNum macro
(placed in a regular code module), as in the example on my web page.

You can get a good introduction to macros at

http://www.mvps.org/dmcritchie/excel/getstarted.htm


In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> OK, I'm not sure what is going on.....I would like to start at a value of 1
> and then get the next sequential number to print in cell G3 across all
> worksheets. Value to change only when an invoice is printed. But right now
> with the number 1 starting in G3 and when I hit print...the value is deleted
> in that worksheet only and it prints nothing. Actually its deleting any
> value in that cell. Where do I put the starting number in the VBE. I'm
> fairly new to this area of excel..and I only have myself to teach me..Thanks
> for any help you can provide me. Or if you could provide me with the exact
> macro I should insert that would be great. Thanks again

How can I set up automatic sequential invoice numbering across multiple
worksheets but in the same workbood? I have all my customers set up on
individual worksheets and would like to assign an invoice number when I
print. Then would like the next time I print possibly a different worksheet
to print the next number up from the previous number that was assigned to the
last invoice.

Take a look at

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

In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> How can I set up automatic sequential invoice numbering across multiple
> worksheets but in the same workbood? I have all my customers set up on
> individual worksheets and would like to assign an invoice number when I
> print. Then would like the next time I print possibly a different worksheet
> to print the next number up from the previous number that was assigned to the
> last invoice.

Does this work considering my worksheets are not templates?

"JE McGimpsey" wrote:

> Take a look at
>
> http://www.mcgimpsey.com/excel/sequentialnums.html
>
> In article <[email protected]>,
> "thecashman" <[email protected]> wrote:
>
> > How can I set up automatic sequential invoice numbering across multiple
> > worksheets but in the same workbood? I have all my customers set up on
> > individual worksheets and would like to assign an invoice number when I
> > print. Then would like the next time I print possibly a different worksheet
> > to print the next number up from the previous number that was assigned to the
> > last invoice.
>

It will if you use the Workbook_BeforePrint event. For example:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim ws As Worksheet
Cancel = True
Application.EnableEvents = False
For Each ws In ActiveWindow.SelectedSheets
ws.Range("B1").Value = NextSeqNum
ws.PrintOut
Next ws
Application.EnableEvents = True
End Sub

In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> Does this work considering my worksheets are not templates?

OK, I'm not sure what is going on.....I would like to start at a value of 1
and then get the next sequential number to print in cell G3 across all
worksheets. Value to change only when an invoice is printed. But right now
with the number 1 starting in G3 and when I hit print...the value is deleted
in that worksheet only and it prints nothing. Actually its deleting any
value in that cell. Where do I put the starting number in the VBE. I'm
fairly new to this area of excel..and I only have myself to teach me..Thanks
for any help you can provide me. Or if you could provide me with the exact
macro I should insert that would be great. Thanks again

"JE McGimpsey" wrote:

> It will if you use the Workbook_BeforePrint event. For example:
>
> Private Sub Workbook_BeforePrint(Cancel As Boolean)
> Dim ws As Worksheet
> Cancel = True
> Application.EnableEvents = False
> For Each ws In ActiveWindow.SelectedSheets
> ws.Range("B1").Value = NextSeqNum
> ws.PrintOut
> Next ws
> Application.EnableEvents = True
> End Sub
>
> In article <[email protected]>,
> "thecashman" <[email protected]> wrote:
>
> > Does this work considering my worksheets are not templates?
>

The code I gave you was based on your also using the NextSeqNum macro
(placed in a regular code module), as in the example on my web page.

You can get a good introduction to macros at

http://www.mvps.org/dmcritchie/excel/getstarted.htm


In article <[email protected]>,
"thecashman" <[email protected]> wrote:

> OK, I'm not sure what is going on.....I would like to start at a value of 1
> and then get the next sequential number to print in cell G3 across all
> worksheets. Value to change only when an invoice is printed. But right now
> with the number 1 starting in G3 and when I hit print...the value is deleted
> in that worksheet only and it prints nothing. Actually its deleting any
> value in that cell. Where do I put the starting number in the VBE. I'm
> fairly new to this area of excel..and I only have myself to teach me..Thanks
> for any help you can provide me. Or if you could provide me with the exact
> macro I should insert that would be great. Thanks again