Excel Power Point folien seitennummerierung Footer Überschrift

Powerpoint 97, Seitennummerierung Seite x von y ?

Von: , Frage gestellt am Fr, 9. Nov 2001

Wie kann ich folien in Powerpoint so nummerieren wie in der Überschrift beschrieben?

In Excel klappts, aber in PP habe ichs noch nicht gefunden...

Danke vorab

2 Antworten zu dieser Frage

1. Antwort von nach 10 Stunden 0 hilfreich

   Re: Powerpoint 97, Seitennummerierung Seite x von

   Hallo Roger,
   
   sorry keine komplette Lösung... - aber
   - der VBA-Aufruf lautet: ActivePresentation.Slides.Count
   - Fußzeile per VBA dfindest Du hier: http://www.ppt-faq.de/vba.htm
   Beides zusammen sollte dann klappen
   
   Grüße
   
   Stefan
   
   Sorry bin heute schon ziemlich lange unterwegs... Wenn es nicht klappt melde Dich, dann baue ich Dir das am Wochenende. [Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]
   

   • Antwort von nach einem Tag 1 hilfreich

     Lösungsansatz

     Hallo Roger,
     
     ich habe mal was gestrickt... Leider kannst Du damit nicht Seite x von y erzeugen. Mit dieser Funktion erzeugst Du einen Eintrag in die Fußzeile von PowerPoint. Bei jeder Änderung der Folienzahl mußt Du das Makro neu starten.
     
     Grüße
     
     Stefan
     
     
     Sub Gesamtseiten()
     With ActivePresentation
     If .HasTitleMaster Then
     .TitleMaster.HeadersFooters.Footer.Text = "Gesamtseiten: " & ActivePresentation.Slides.Count
     .TitleMaster.HeadersFooters.Footer.Visible = True
     End If
     .SlideMaster.HeadersFooters.Footer.Text = "Gesamtseiten: " & ActivePresentation.Slides.Count
     .SlideMaster.HeadersFooters.Footer.Visible = True
     End With
     End Sub
     

Keine passende Antwort gefunden? Jetzt eigene Frage stellen!