HELP! I have a 1 sheet (portrait) document that i would like printed out 100 times, but the first page I would like numbered 1 and the last page I would like to be numbered 100. is this possible?
At the moment I am having to print a blank 100 page word document and then use those pages to print my document from excel 100 times! Its too long winded and fiddly, and liable to go horribly wrong if someone in my office uses the printer when I am sending my document to print!
You could use some code like this:
Sub test() Dim i As Long For i = 1 To 100 With Sheets("Sheet1") .PageSetup.CenterFooter = "Page " & i .PrintOut End With Next i End Sub
Change the sheet name as appropriate.
Dom
"May the fleas of a thousand camels infest the crotch of the person who screws up your day and may their arms be too short to scratch..."
Use code tags when posting your VBA code: [code] Your code here [/code]
Remember, saying thanks only takes a second or two. Click the little star to give some Rep if you think an answer deserves it.
code - i am not that clever!
I still need help with this!
The code needs to go into a regular VBA module: http://www.contextures.com/xlvba01.html#Regular
Dom
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks