auto format of info in footer

S

scott

I have an 8 page excel document which has to be printed 280
times but each group of 8 must contain a 3 digit number in
the footer (separate from the page number). Being numeric,
can anyone figure out a way to program the footer quicker
than manually opening the footer and inserting the next 3
digit number on the subsequent groups of 8, 279 more times?
 
T

Tom Ogilvy

Activesheet.PageSetup.CenterFooter = Format(val,"000")

You could possibly manage this in the beforeprint event if you are printing
each page individually. or as an 8 page group.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Page numbering with Merged Document and IF statements 1
Need VBA Macro to Loop through pages and print counter in footer of each page 9
Further Challenges with Footers and automatic text wrapping 1
Method to automate page numbers on single worksheet 1
Report - Don't print the page footer on the last page 9
Group Footer Summarizing Problem 5
matching a format in a lookup 3
How to start Page Numbering over in Document. 3

Top