Forum Home
Press F1
 
Thread ID: 121177 2011-10-14 22:28:00 Excel auto number printing berryb (99) Press F1
Post ID Timestamp Content User
1237613 2011-10-14 22:28:00 Is it possible to have a number field auto add 1 to a number whilst printing?

Have an excel spreadsheet with a job number that needs to go up 1 number for each printed page. So starting number is 1000 and 50 pages are needed. I want each page printed to have the job number field adjusted up by 1 - 1001, 1002, 1003, ............... 1050

Is this possible or do I have to copy and paste the one page multiple times (say 20) within the sheet and have a formula adding on to every page. Change the number at the top 1000 and it will change the 20 pages to 1020 on the last page. This is easy to setup but would prefer the other option if possible.

Cheers
berryb (99)
1237614 2011-10-15 01:20:00 Might be able to use headers/footers to insert date code/field and assign a page number to start from to print, and possibly finish. Microsoft article (office.microsoft.com) may help. kahawai chaser (3545)
1237615 2011-10-15 05:21:00 If you're ok with using macros you can use this it will cycle through and print 51 (1000 to 1050) times based on the 1st Page Number you enter

Sub Print50Pages()
Dim PageNumber As Integer
Dim NewPageNumber As Integer
PageNumber = InputBox("Enter 1st Page Number")
EndPageNumber = PageNumber + 51
While PageNumber < EndPageNumber
Range("I1").Value = PageNumber
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
PageNumber = PageNumber + 1
Wend
End Sub

You'll just need to change the I1 cell reference to match the cell that currently holds the job number

I suggest you change the 51 to a smaller number while you are testing the job


Trev
TeejayR (4271)
1237616 2011-10-15 10:39:00 Thanks will give it a go and report back. berryb (99)
1