Wenden Sie ein Folienlayout erneut auf vorhandene Folien an

470
wizzwizz4

Ich habe eine PowerPoint-Präsentation, bei der die ungeradzahligen Folien das Master-Layout A haben und die geradzahligen Folien das Master-Layout B (mit einigen Ausnahmen, die ich manuell sortieren kann). Wenn ich eines der Layouts aktualisiere (z. B. Platzhalter hinzufügen oder verschieben), muss ich jede andere Folie manuell auswählen, um das Layout erneut auf sie anzuwenden. Wie kann ich das Layout automatisch auf diese Folien anwenden?

Wenn es dafür keine integrierte Funktion gibt (oder sogar, wenn!), Wäre ein Makro genauso nützlich.

0
Ich bin kein Stammgast hier und wusste nicht so recht, wie ich es kennzeichnen soll. Wenn es falsch markiert ist, beheben Sie es bitte! :-) wizzwizz4 vor 7 Jahren 0
Ihre Tags sind relevant - kein Problem, aber ich denke, Sie brauchen nicht einmal Makros. Aktivieren Sie einfach die Option "Auf alle Folien anwenden" in der Symbolleiste. Wenn Sie sich mit Code beschäftigen möchten, veröffentlichen Sie die Website www.stackoverflow.com Anand S vor 7 Jahren 0
@AnandS Ich möchte nicht über Code diskutieren, denn dann würde ich mich dem XY-Problem schaden, und "Gib mir den Codez" - Fragen werden dort nicht geschätzt (oder hier, aber das ist nicht ganz eine). Ich möchte nicht die Option "Auf alle Folien anwenden". Ich möchte es nur auf Folie 4 und jede andere Folie nach 7 anwenden. wizzwizz4 vor 7 Jahren 0
Danke fürs klarstellen! Und ich glaube, Sie haben mich missverstanden - ich fordere Sie nicht auf, den vollständigen Code zu fordern, sondern Sie bitten, diese Frage zu Stack Overflow zu verschieben, da es hier um das Codieren geht ... Anand S vor 7 Jahren 0
@AnandS Ich hatte gehofft, dass es eine integrierte Funktion gibt, die es mir erlaubt, dies zu tun. Sie alle haben bereits das richtige Folienlayout. Ich möchte es nur auf diejenigen anwenden, die es bereits haben, wie unter https://support.office.com/de-de/article/Change-a-slide-layout-489A23C6-7170-455E-BB88- CF5D6F09D990 wizzwizz4 vor 7 Jahren 1
Sie verstehen, dass Sie die gewünschten Folien in der Foliensortierungsansicht auswählen können, indem Sie bei gedrückter Strg-Taste auswählen und dann Home | verwenden Folien | Layout, um das gewünschte Layout anzuwenden, oder? Ein bisschen langweilig, aber für einen One-Shot viel schneller als das Suchen / Schreiben von Code, um die Arbeit zu erledigen. Steve Rindsberg vor 7 Jahren 0
@SteveRindsberg Ich verstehe das, aber ich mache das mehrmals. Ich habe das schon zweimal gemacht: -] wizzwizz4 vor 7 Jahren 0

2 Antworten auf die Frage

1
Steve Rindsberg

Da in einem Präsentationsdesign normalerweise keine 32 Layouts vorhanden sind, gehe ich davon aus, dass Sie ein benutzerdefiniertes Layout haben. Versuchen Sie es in jedem Fall, indem Sie die richtige Zahl für 2 unten eingeben:

Sub ReapplyMaster() Dim slidenum As Long For slidenum = 3 To ActivePresentation.Slides.Count Step 2 With ActivePresentation.Slides(slidenum)  .CustomLayout = ActivePresentation.Designs(1).SlideMaster.CustomLayouts(2)  End With Next End Sub
Ich habe die Frage geändert, um das Makro zu entfernen, aber Ihre Antwort wird dadurch nicht ungültig. Würde `.CustomLayout = .CustomLayout` funktionieren? wizzwizz4 vor 7 Jahren 0
Es wäre schneller, es zu versuchen, als hier auf eine Antwort zu warten, oder? Steve Rindsberg vor 7 Jahren 0
Denken Sie, ich sollte Ihre Antwort akzeptieren (zeigt viel Mühe und ist erweiterbar) oder die Antwort, die ich gepostet habe (ist eine integrierte Funktion, die eher für Benutzer ohne Power-Nutzer geeignet ist)? wizzwizz4 vor 7 Jahren 0
Da dies SuperUser und nicht StackOverflow ist, würde ich mit Ihrer eigenen Antwort gehen (was mehr oder weniger dem Vorschlag entspricht, den ich früher gemacht habe). Steve Rindsberg vor 7 Jahren 0
Danke für Ihre Hilfe. Ich werde einfach 22 Stunden warten, bevor ich akzeptiere, nur weil ich Lust habe und definitiv nicht, weil das System eine Einschränkung von> 48 Stunden hat. wizzwizz4 vor 7 Jahren 0
0
wizzwizz4

Um das aktuelle Folienlayout erneut auf eine Folie anzuwenden, klicken Sie mit der rechten Maustaste auf die Folie und wählen Sie im Kontextmenü "Folie zurücksetzen". Im linken Bereich können Sie Folienbereiche oder sogar die gesamte Präsentation auswählen. Dadurch wird das Layout für alle Folien erneut angewendet, nicht nur für bestimmte, sondern jede Folie behält das vorhandene Layout bei.

Verwandte Probleme