print header row on all pages except last page
Woof
Sub rows_to_repeat()
With ActiveSheet.PageSetup
.PrintTitleRows = "$1:$1"
ActiveSheet.PrintOut From:=1, To:=11
.PrintTitleRows = ""
ActiveSheet.PrintOut From:=12, To:=12
End With
End Sub
Gord Dibben MS Excel MVP
On Wed, 10 Jan 2007 12:07:01 -0800, Woofaloo
wrote:
I would like to print a worksheet that is 12 pages and repeat rows on 11
pages except the last one since the the last page is the total page. HELP!!!
|