Hi all

I would like to get the name of the sheet in cell A1, is there a
function for that?

Can I get it like this?

Function GetPageName()
GetPageName = Worksheets(5).Name
End Function

and use it in a cell like

=GetPageName( WhatDoI_needToPutHere? )

When printing, I want all pages to be landscape - how do I do that?
And the 2 upper lines, should read:

<page name pageno. < of pages
Headers....

WBR
Sonnich