Gibt es eine Möglichkeit, alle in einer PowerPoint-Präsentation verwendeten Formen anzuzeigen?

405
SuziLmrdo

Ich arbeite an einer Präsentation mit ungefähr 150 kombinierten Tabellen und Diagrammen, um den Überblick zu behalten. Im Bereich Auswahl und Sichtbarkeit (Bildtools> Anordnen> Auswahlbereich) kann ich eine Liste aller Formen auf einer Folie benennen und anzeigen. Es gibt jedoch die Option, eine Ebene nach oben zu gehen und eine Liste aller Formen anzuzeigen, die in der gesamten Ansicht verwendet werden Präsentation?

1

2 Antworten auf die Frage

0
Steve Rindsberg

Nein, PowerPoint verfügt nicht über eine Funktion, die dies ermöglicht.

Was genau willst du damit erreichen? Vielleicht gibt es einen anderen Weg.

Das Unternehmen, für das ich arbeite, verwendet PowerPoint als Layoutsoftware für Veröffentlichungszwecke. Dies ist eine etablierte Methode für sie, und ich habe nicht den Einfluss, eine ganze Abteilung davon zu überzeugen, zu einer Software wie Adobe Pagemaker oder sogar Microsoft Word zu wechseln. SuziLmrdo vor 6 Jahren 0
Eine meiner Hauptaufgaben besteht darin, die Berichte zusammen mit den Diagrammen und Tabellen zu erstellen, die durchschnittlich 100 Zahlen und 50 Tabellen pro Publikation enthalten. Jeder Bericht ist im Durchschnitt etwa 70 bis 90 Seiten groß. Daher ist es sehr schwierig, die Positionen der einzelnen Figuren innerhalb der Präsentation zu verfolgen. Ich würde gerne eine Möglichkeit finden, eine Tabelle mit Abbildungen zu erstellen, die den Folienstandort automatisch aktualisiert, wenn Sie Folien hinzufügen oder entfernen. SuziLmrdo vor 6 Jahren 0
Etwas, das automatisch aktualisiert würde, wäre ziemlich schwierig zu schreiben, aber das Erstellen eines solchen Berichts würde wahrscheinlich eine Minute dauern. Die eindeutige Identifizierung jeder Tabelle / Figur wäre der schwierige Teil. Wie können Sie die Zahl auf Folie 42 identifizieren, damit der Code sie erkennen und dem Benutzer auf sinnvolle Weise melden kann? Steve Rindsberg vor 6 Jahren 0
In einem Bericht benenne ich Tabellen und Abbildungen in der Reihenfolge ihres Aussehens von oben nach unten, wobei sie im Uhrzeigersinn gehen. Ich habe jedes Bild bereits durchgesehen und benannt. Wenn ich also zum Auswahlfenster für Folie 42 gehe, kann ich sehen, dass es die Abbildungen 74 und 75 und Tabelle 21 enthält (Abbildungen und Tabellen werden separat gezählt). Dies unterscheidet sich von der Reihenfolge, in der sie erstellt wurden, es könnte sich um den Inhalt der Umfrage 12 und 66 handeln. Wenn es eine Möglichkeit gäbe, Eingaben aus dem alten Text aufzunehmen, könnte dort eine Beschreibung jeder Figur / Tabelle enthalten sein. Fragen Sie das? SuziLmrdo vor 6 Jahren 0
Ich erwarte nicht, dass sich die Zahlen und Tabellen automatisch selbst beschriften, aber wenn ich Platz für Kommentare schaffen muss und ich etwas auf eine andere Folie stoße, wäre es hilfreich, dies zu verfolgen. Am Ende muss ich sicherstellen, dass alles irgendwohin geht. SuziLmrdo vor 6 Jahren 0
Ich bin nicht sicher, ob es eine Lösung dafür gibt. Ohne eine Möglichkeit, die Abbildungen / Tabellen zu identifizieren, ist das Beste, was ein Bericht Ihnen geben kann: Auf Tabelle 14 befindet sich eine Tabelle. Und vielleicht etwas Text aus der Tabelle. Steve Rindsberg vor 6 Jahren 0
Ich verstehe die Frage wahrscheinlich nicht ... Was meinen Sie mit "Identifizieren?". Muss ich jedem eine Art ID-Nummer zuweisen? SuziLmrdo vor 6 Jahren 0
Es gibt verschiedene Möglichkeiten, Objekte in PowerPoint einzubetten. Wenn ich Links einbetten würde, gibt es einen Bericht, der mir sagen könnte, welche Links in jeder Folie enthalten sind? Die Links müssten eindeutig sein SuziLmrdo vor 6 Jahren 0
Ein Linkbericht ist einfach. Ich habe ein kommerzielles Add-In, mit dem defekte Links behoben werden können. Die kostenlose Demo führt einen Linkbericht aus, der die Links auf jeder Folie auflistet. Es heißt PTools FixLinks. Für das, worüber du sprichst, betrachte es als Freebie; Die kostenpflichtige Version würde in Ihrem Fall keinen Wert hinzufügen. http://www.pptools.com/fixlinks/index.html Steve Rindsberg vor 6 Jahren 1
danke für diesen link! Freut mich über diese Add-Ins. Ich habe tatsächlich eine verwandte Frage zu Stack Overflow gefunden und VBA von dort angepasst, um eine Liste von Abbildungen und Tabellen pro Folie zu erstellen. Wenn ich Objekte in aufsteigender Reihenfolge drucken lassen möchte, muss ich leider die Auswahlfensterobjekte in absteigender Reihenfolge manuell anordnen, aber abgesehen von dieser Masche funktioniert das einwandfrei. SuziLmrdo vor 6 Jahren 0
0
SuziLmrdo

Ich wollte eine teilweise Antwort auf meine eigene Frage geben, die auf VBA basiert, die im folgenden Thread bei Stapelüberlauf gefunden wurde: VBA, um alle Objektnamen einer Powerpoint-Präsentation aufzulisten

Diese Lösung ermöglicht es einer Person, alle in einer PowerPoint-Präsentation verwendeten Formen über einen Textdateibericht anzuzeigen.

Sub ListAllShapes()  Dim curSlide As Slide Dim curShape As Shape Dim lFile As Long Dim sPath As String  sPath = ActivePresentation.Path  lFile = FreeFile  Open sPath & "\All Shapes.txt" For Append As #lFile  For Each curSlide In ActivePresentation.Slides Print #lFile, "SLIDE " & curSlide.SlideNumber For Each curShape In curSlide.Shapes Print #lFile, " " & curShape.Name Next curShape Next curSlide  Close #lFile  End Sub 

Dadurch wird ein Textbericht generiert, der folgendermaßen aussieht:

SLIDE 1 Rectangle 2 Rectangle 4 Rectangle 4 TextBox 10 Rectangle 4 SLIDE 2 TextBox 7 Rectangle 2 Rectangle 4 Rectangle 4 Line 37 Picture 1 Picture 2 SLIDE 3 Rectangle 2 Rectangle 4 Rectangle 7 TextBox 7 Line 28 Picture 3 Picture 4, etc... 

Für meinen speziellen Anwendungsfall wollte ich eine Liste nur bestimmter Formen pro Folie. Dies wurde erreicht, indem ich zunächst jedes Bild, das eine Figur oder Tabelle enthielt, mit einem entsprechenden Präfix benannte und dann folgendes ausführte:

Sub ListFiguresAndTables()  Dim curSlide As Slide Dim curShape As Shape Dim lFile As Long Dim sPath As String  sPath = ActivePresentation.Path  lFile = FreeFile  Open sPath & "\Figures and Tables.txt" For Append As #lFile  For Each curSlide In ActivePresentation.Slides Print #lFile, "SLIDE " & curSlide.SlideNumber For Each curShape In curSlide.Shapes If Left(curShape.Name, 4) = "Fig." Or Left(curShape.Name, 5) = "Table" Then Print #lFile, " " & curShape.Name End If Next curShape Next curSlide  Close #lFile  End Sub 

Leider kann ich das Makro nur in aufsteigender Reihenfolge drucken, wenn ich den Auswahlbereich zum manuellen Anordnen von Formen zuerst in der entgegengesetzten (absteigenden) Reihenfolge benutze.

SLIDE 1 Fig. 1 Fig. 2 Fig. 3 Table 1 SLIDE 2 Fig. 4 Fig. 5 Fig. 6  SLIDE 3 Table 2 Table 3 (etc.)