Probleme mit VBA

Wie kann ich, mit hilfe von VBA seiten nummerrieren, so das es mit ausgedruckt wird?! Ich hätte gerne da stehen: 1 von X (wobei X natürlich eine Variable ist, die abhängig davon ist, wie viele seiten gedruckt werden) bis jetzt benutze ich :

.RightFooter = "&P"

und ist es mir möglich, das seitenlayout so anzulegen, das alles was ich drucken möchte auf eine seite passt?! also nicht nach rechts zu weit absteht, habe das jetzt mit einem eingebundenem makro aber das gefällt mir noch nicht so 100%...

auch hätte ich gerne meine überschriftszeile auf jeder seite wieder, so das mann wenn man die zettel umblättert noch weiss was in jeder spalte der tabelle steht :)
danke für die hilfe jetzt schonmal.