Sequential Pages from only one Sheet

[Yodie]

IE) How to create "blank" invoice forms from only creating ONE sheet. Such "blank" invoice forms must have sequential numbering on each form printed.

 

[Yogi Anand]

On 2002-10-16 19:52, Yodie wrote:
IE) How to create "blank" invoice forms from only creating ONE sheet. Such "blank" invoice forms must have sequential numbering on each form printed.

Hi Yodie:

Welcome to the Board!

I am not quite clear on the idea of having blank invoices with numbers -- why? what is the purpose?

In any event, it will be almost like a template -- you will have all the formulas put in, and the Invoice Numbers assigned.

When comes time to use the invoice, all transaction data gets entered in, and then you move on to the next numbered invoice.

I am not sure if this has been any help -- if not explain a little further and let us take it from there.

Regards!

Yogi

 

[Yodie]

I want to create ONE form on ONE page in excel. I want to print this page out 2000 times, with a different "INVOICE #" on each page. I do not want to print one page, then change the number, then print again. I tried using the page number formula in the page header, but when I tell it to print say 2000 pages, I get 2000 pages with page 1 on them. What I want is 2000 pages, numbered 1 to 2000, at a simple click. Is this possible?

 

[Andrew Poulsom]

You could use some VBA code to do this:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Dim x As Integer
    Dim Copies
    Copies = InputBox("How Many Copies?")
    If Copies = "" Then
        Cancel = True
        Exit Sub
    End If
    Application.EnableEvents = False
    For x = 1 To Copies
        With ActiveSheet
            .PageSetup.LeftHeader = "Invoice No " & x
            .PrintOut
        End With
    Next x
    Cancel = True
    Application.EnableEvents = True
End Sub

To use it, right click the Excel icon to the left of File on the menu and choose View Code. Paste the above into the window on the right. Press Alt+F11 to return to your workbook and click the Print button.