PowerPoint: Vytvořte ukazatel průběhu pro prezentaci
Chcete-li si udržet přehled o své prezentaci v PowerPoint, můžete pro aplikaci PowerPoint vytvořit ukazatel průběhu. Ukazuje vám a vašemu publiku, jak daleko jste se svou prezentací. Tento praktický tip vám ukáže, jak to udělat.
Vložte indikátor pokroku v aplikaci PowerPoint - musíte to udělat
Níže vám ukážeme, jak vytvořit ukazatel průběhu vaší prezentace PowerPoint:
- Nejprve otevřete "Možnosti" v aplikaci PowerPoint.
- Klikněte na "Přizpůsobit pás karet" a zaškrtněte "Nástroje pro vývojáře". Tento proces uložte pomocí „OK“.
- Nyní musíte přejít na kartu Nástroje pro vývojáře. Poté klikněte na "Visual Basic".
- Chcete-li sem vložit text, klikněte na „Vložit“ a nakonec na „Modul“.
- Zde vložte následující kód (zdroj: Incas Blog):
- Možnost Explicitní veřejné sld jako snímek Veřejné shp jako tvar Sub EinfProbar () Dim AnzSeiten As Long AnSSeiten = ActivePresentation.Slides.Count za každý sld In ActivePresentation.Slides 'AddShape Parametry (Form (1 = obdélník)), vzdálenost zleva, vzdálenost shora, Šířka, výška) Nastavit shp = sld.Shapes.AddShape (1, 36, 500, 648 / AnzSeiten * sld.SlideNumber, 10) 'Přiřazení názvu pro indikátor průběhu; Aby bylo možné lištu později odstranit, je potřeba. shp.Name = "ProBar" & sld.SlideNumber shp.Fill.ForeColor.RGB = RGB (0, 52, 104) shp.Fill.BackColor.RGB = RGB (0, 52, 104) Next End Sub Sub DelProbar () Pro každý sld In ActivePresentation.Slides Pro každý shp In sld.Shapes If shp.Name Like "ProBar *" Thenshp.Delete End If Next Next End Sub
- Poté můžete nástroj opustit a kliknout na „Makra“ pod „Vývojové nástroje“.
- Chcete-li vložit ukazatel průběhu, označte položku „EinfProbar“ a potvrďte tlačítkem „Provést“.
- Poznámka: Lišta se neaktualizuje automaticky. Pokud aktualizujete svou prezentaci, musíte panel odstranit pomocí „Makra“> „DelProbar“ a znovu jej vložit, jak je popsáno v kroku 7.
Tento praktický tip je založen na sadě Office 2010 ve Windows 7. V dalším praktickém tipu vám ukážeme, jak můžete sledovat změny v aplikaci PowerPoint.