Fügen Sie den Fortschrittsbalken in die PowerPoint-Präsentation ein
Das Einfügen eines Fortschrittsbalkens muss über ein Makro erfolgen . Mit einem VBE oder Visual Basic-Editor können Sie bestimmten Code schreiben, um die Leiste in PowerPoint einzufügen und die gewünschte Farbe, Höhe und Breite der Leiste zu konfigurieren. Dieser Artikel erklärt, wie.
Fügen Sie der PowerPoint-Präsentation eine Fortschrittsanzeige hinzu
Eine Fortschrittsleiste befindet sich normalerweise am unteren Rand Ihrer PowerPoint-Folie und ist im Hinblick auf den Rest Ihres Inhalts subtil. Gehen Sie zum Einfügen der Leiste zu Extras > Makro > Visual Basic-Editor .Wählen Sie im folgenden Fenster Einfügen > Modul und fügen Sie diesen Text in die leere Seite ein:
Sub AddProgressBar ()On Error Resume Weiter
Mit ActivePresentation
Für X = 1 To .Slides.Count
.Folien (X) .Formen ("PB"). Löschen
Setze s = .Slides (X) .Shapes.AddShape (msoShapeRectangle, _
0, .PageSetup.SlideHeight - 12, _
X * .PageSetup.SlideWidth / .Slides.Count, 12)
s.Fill.ForeColor.RGB = RGB (127, 0, 0)
s.Name = "PB"
Nächstes X:
Ende mit
End Sub
Gehen Sie anschließend zu Datei > Schließen > Zurück zu PowerPoint . Sie werden zu Ihrer Präsentation zurückgebracht.
Gehen Sie nun zu Extras > Makro > Makros . Wählen Sie AddProcessBar und drücken Sie Execute . Ein Fortschrittsbalken sollte jetzt angezeigt werden:
Entfernen Sie die Fortschrittsanzeige aus PowerPoint
Wenn Sie Ihre Fortschrittsanzeige aus Ihrer PowerPoint-Präsentation entfernen möchten, kehren Sie einfach zu Ihrem Modul zurück und ersetzen Sie diesen Code:Setze s = .Slides (X) .Shapes.AddShape (msoShapeRectangle, _ 0, .PageSetup.SlideHeight - 12, _ X * .PageSetup.SlideWidth / .Slides.Count, 12)
mit den folgenden:
Setze s = .Slides (X) .Shapes.AddShape (msoShapeRectangle, 0, 0, 0, 0)
Führen Sie den Makro aus, um Ihre Statusanzeige zu entfernen.