TextRange.InsertSlideNumber-Methode (PowerPoint)
Fügt die Foliennummer der aktuellen Folie in den angegebenen Textbereich ein. Gibt ein TextRange -Objekt, das die Foliennummer darstellt.
Syntax
Ausdruck. InsertSlideNumber
Ausdruck Eine Variable, die ein TextRange-Objekt darstellt.
Rückgabewert
TextRange
Hinweise
Die eingefügte Foliennummer wird automatisch aktualisiert, wenn sich die Foliennummer der aktuellen Folie ändert.
Beispiel
In diesem Beispiel wird nach dem ersten Satz des ersten Absatzes in der zweiten Form von Folie 1 der aktiven Präsentation die Foliennummer der aktuellen Folie eingefügt.
Set sh = Application.ActivePresentation.Slides(1).Shapes(2)
Set sentOne = sh.TextFrame.TextRange.Paragraphs(1).Sentences(1)
sentOne.InsertAfter.InsertSlideNumber
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.