Insert Text at Bottom of Last Page
 

Thanks in advance to everyone who tries to help me with this.

I have a spreadsheet that serves as a quotation page for services to
be provided. The number of pages of the quotation varies depending on
the amount of services.

My problem is how to automatically insert a disclaimer at the bottom
of only the last page, just above the footer. I have page numbers
printing in the footer.

When I select File, Page Setup and hit Enter, the dotted lines appear
to show where the page will end, so I can currently cut and paste the
five lines of text just above the dotted line. I would like to find a
way to automatically locted that dotted line (last row printing on the
last page) and insert the lines by using the BeforePrint event.

Any ideas?

Thanks,

Steve

Insert Text at Bottom of Last Page
 

Look at the hPageBreaks collection.

? activesheet.hpagebreaks(activesheet.hpagebreaks.co unt).Location.Address
$A$52

--
Regards,
Tom Ogilvy

"Steve" wrote in message
...
Thanks in advance to everyone who tries to help me with this.

I have a spreadsheet that serves as a quotation page for services to
be provided. The number of pages of the quotation varies depending on
the amount of services.

My problem is how to automatically insert a disclaimer at the bottom
of only the last page, just above the footer. I have page numbers
printing in the footer.

When I select File, Page Setup and hit Enter, the dotted lines appear
to show where the page will end, so I can currently cut and paste the
five lines of text just above the dotted line. I would like to find a
way to automatically locted that dotted line (last row printing on the
last page) and insert the lines by using the BeforePrint event.

Any ideas?

Thanks,

Steve