Vložte Progress Bar do PowerPoint prezentácie

Pridané vizuálne komponenty, ako je napr. Indikátor priebehu, môžu vaše prezentácie programu PowerPoint oveľa viac osloviť divákov. Indikátor priebehu zobrazí stav aktuálnej snímky vo vzťahu k celkovému počtu snímok v prezentácii.

Vloženie ukazovateľa priebehu sa musí vykonať pomocou makra . Pomocou VBE alebo vizuálneho základného editora môžete napísať špecifický kód pre vloženie lišty do PowerPointu a konfiguráciu požadovanej farby, výšky a šírky lišty. Tento článok vysvetlí, ako.

Pridanie ukazovateľa pokroku do prezentácie programu PowerPoint

Indikátor priebehu je zvyčajne umiestnený v spodnej časti snímky programu PowerPoint, čím sa udržiava jemný, pokiaľ ide o zvyšok obsahu. Ak chcete vložiť lištu, prejdite na položku Nástroje > Makro > Editor jazyka Visual Basic .

V okne, ktoré sa otvorí, vyberte Insert > Module a vložte tento text na prázdnu stránku:

 Sub AddProgressBar ()
On Error Resume Ďalej
S ActivePresentation
Pre X = 1 Do .Slides.Count
.Slides (X) .Shapes ( "PB"). Delete
Nastaviť 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"
Nasledujúci X:
Koniec s
End Sub

Ďalej choďte do File > Close > Return to PowerPoint . Dostanete sa späť do vašej prezentácie.

Teraz choďte na Nástroje > Makro > Makrá . Vyberte AddProcessBar a stlačte Execute . Teraz by sa mal zobraziť indikátor priebehu:

Odstráňte ukazovateľ priebehu z programu PowerPoint

Ak chcete odstrániť prezentáciu z prezentácie programu PowerPoint, vráťte sa späť do svojho modulu a tento kód nahraďte takto:

 Nastaviť s = .Slides (X) .Shapes.AddShape (msoShapeRectangle, _ 0, .PageSetup.SlideHeight - 12, _ X * .PageSetup.SlideWidth / .Slides.Count, 12) 

s nasledovným:

 Nastaviť s = .Slides (X) .Shapes.AddShape (msoShapeRectangle, 0, 0, 0, 0) 

Spustite makro, aby ste odstránili indikátor priebehu.