Repeat Multiple Page Headers using VBA

  • Thread starter Thread starter CST
  • Start date Start date
C

CST

Is there a way to print multiple row headers? For example, I have a
the following:

A B C
1 2 3
3 2 1

D E F
1 2 3
3 2 1

I want to repeat cols A:C for the first data range when it spills over
to page 2. Cols D:F is the next data range on page 2, which spills
over to page 3. I now want D:F to be the headers. So in summary, I
want page 1-2 to have A:C header and at the same time on page 2-3 have
D:F. I hope this makes sense and that this it is possible.

I have used this code, but it only works for 1 continuous range.
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$1"
End With

It would be nice to have something like this, but it doesn't work:
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$1"
.PrintTitleRows = "$20:$20"
.PrintTitleRows = "$40:$40"
 
You would have to print each section separately and reset the rows to repeat
at top prior to printing.
 
Thank you for the response. Unfortunately, we have to have these
sections continuous. I pretty much thought that there wasn't a way, but
wanted to throw the question out anyways. Any other suggestions? TIA!
 
Move your sections to separate sheets, define the rows to repeat at top for
each, group the sheets and print.
 
Back
Top