Hogyan lehet előrehaladási sávot létrehozni a Microsoft PowerPoint alkalmazásban

Avatar Gadam | 2021.02.23. 352 Views 0 Likes 0 Ratings

352 Views 0 Ratings Rate it

[ad_1]

Microsoft PowerPoint logó

A folyamatjelző sáv egy olyan grafika, amely a PowerPointban vizuálisan ábrázolja a befejezett diavetítés százalékos arányát. Ez jó mutató a fennmaradó összegről is. Így hozhat létre előrehaladási sávot a Microsoft PowerPoint-ban.

A folyamatjelző sávot manuálisan is létrehozhatja alak beillesztése az egyes diák alján. Ezzel a megközelítéssel az a probléma, hogy meg kell mérnie az egyes alakzatok hosszát a prezentációban szereplő diák száma alapján. Ezen felül, ha hozzáad vagy eltávolít egy diát, akkor manuálisan kell megismételnie az előrehaladási sávot a diavetítés minden egyes diáján.

Annak érdekében, hogy minden következetes maradjon és komoly fejfájást érjen el, használjon makrót a folyamatjelző sáv létrehozásához. Ezzel a makróval a folyamatjelző sáv automatikusan beállítja magát a prezentációban szereplő diák száma alapján.

ÖSSZEFÜGGŐ: Makrók magyarázata: Miért lehetnek veszélyesek a Microsoft Office fájlok?

Első, nyissa meg a PowerPoint bemutatót hogy szeretne létrehozni egy előrehaladási sávot. Miután megnyílt, kattintson a „Nézet” fülre, majd válassza a „Makrók” lehetőséget.

Megjelenik a „Makró” ablak. A „Makró neve” alatti szövegmezőbe írja be az új makró nevét. A név nem tartalmazhat szóközt. Miután megadta, kattintson a „Létrehozás” gombra, vagy ha Mac-et használ, kattintson a „+” ikonra.

Most megnyílik a „Microsoft Visual Basic for Applications (VBA)” ablak. A szerkesztőben ezt a kódot fogja látni:

Sub ProgressBar()

End Sub

Először helyezze a kurzort a két kódsor közé.

Ezután másolja és illessze be ezt a kódot:

On Error Resume Next
With ActivePresentation
For X = 1 To .Slides.Count
.Slides(X).Shapes("PB").Delete
Set 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"
Next X:
End With

Miután beillesztette, a kódnak így kell kinéznie a szerkesztőben.

Jegyzet: Az első és az utolsó kódsor között nincsenek sortörések.

Most bezárhatja a VBA ablakot. Visszatérve a Microsoft PowerPoint alkalmazásba, kattintson ismét a „Nézet” fülön a „Makrók” elemre.

Ezután válassza ki a makró nevét (példánkban a „ProgressBar”), majd kattintson a „Futtatás” gombra.

A folyamatjelző sáv mostantól a prezentáció minden egyes alján megjelenik.

Ha diát töröl, a folyamatjelző sáv automatikusan beállítja magát. Új dia hozzáadásakor újra futtatnia kell a makrót (Nézet> Makró> Futtatás). Kisebb kellemetlenség, ha összehasonlítunk mindent kézzel.



[ad_2]
Source link