Powerpoint 97, Seitennummerierung Seite x von y ?

Computer: Software & Programmierung Office Software
1

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

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]

3

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

1 „Gefällt mir“