Office: (Office 2010) per VBA Fußzeile mit Seite/Seiten

Hallo Leute,

ich zu blöde oder gibt es hier einen Trick, man in XL2010 per VBA im Tabellenblatt eine Fußzeile im Format Seite X von Y einzufügen.

Nach langer Suche habe ich schon eimal die aktuelle Seite gefunden, aber mit fehlt noch die Gesamtseitenzahl. Ich finde einfach nicht die Lösung.

Hat einer vielleicht eine Idee?

Hier mein Code:

Code:

Auch der vom Recorder generierte Code hilft nicht weiter.

Vielen Dank im Voraus.

Gruß Nimrod

:)

 

benutze den Makrorekorder.

 

Moin!
Der Makrorekorder liefert hier falsche Ergebnisse, Hajo!
Die korrekten Formatcodes findet man hier:
https://msdn.microsoft.com/de-de/VBA...rs-and-footers

Gruß Ralf

 

Sorry, aber

.CenterFooter = "Seite &S von &N"

gibt mir nicht die Gesamtseite aus.

Ich erhalten nur

Seite 1 von

 

Du solltest den Link lesen!

 

Wie bescheuert ist das denn von MS?

Hier meine Lösung:





Es muss tatsächlich im HTML-Format eingeben werden.

Auf so eine Idee muss man erst einmal kommen. *upps

Danke für den Hinweis.

Gruß Nimrod

 

Zunächst:
Es braucht kein HTML, sondern lediglich:
Code:

Nun, so bescheuert ist das nicht, sondern eher ein technisches Problem bei JEDER Aufzeichnung von Strings.
Mal ein Beispiel:
Ich kann in der Datenüberprüfung, Liste eine Liste mit 1;2;3 als Quelle erstellen.
Der Makrorekorder liefert:
Code:

Richtig ist hier das englische Trennzeichen Komma:
Formula1:="1,2,3"

Muss man halt nur wissen, dass es bei Strings Probleme geben kann.

Gruß Ralf

 

Ich war nur halt frustriert, aber wenn ich im VBA-Code eingebe:

.CenterFooter = "Seite &P von &N"

Dann wird mit die Gesamtzahl der Seiten nicht angezeigt, sondern als Ergebnis nur: 1/

Aber jetzt habe ich wieder meinen Ruhepuls und alles ist gut. *cool.gif*

Nochmals danke für die Info.