PowerPoint: Създайте лента за напредък за презентация
Свързани Видеоклипове: (Може 2024).
За да запазите преглед на вашата PowerPoint презентация, можете да създадете лента за напредък на PowerPoint. Той показва на вас и на вашата аудитория колко сте далеч от вашата презентация. Този практичен съвет ви показва как да направите това.
Поставете индикатора за напредък в PowerPoint - трябва да направите това
По-долу ви показваме как да създадете лента за напредък за вашата презентация PowerPoint:
- Първо отворете „Опции“ в PowerPoint.
- Кликнете върху „Персонализиране на лентата“ и поставете отметка „Инструменти за програмисти“. Запазете този процес с „OK“.
- Сега трябва да отидете в раздела „Инструменти за програмисти“. След като отидете там, кликнете върху "Visual Basic".
- За да вмъкнете текст тук, щракнете върху "Вмъкване" и накрая върху "Модул".
- Поставете следния код (източник: Incas Blog) там:
- Опция Изрично публично sld като Slide Public shp As Shape Sub EinfProbar () Dim AnzSeiten As Long AnSeiten = ActivePresentation.Slides.Count за всеки sld в ActivePresentation.Slides 'AddShape Parameters (Форма (1 = правоъгълник), разстояние отляво, разстояние отгоре, разстояние, Ширина, височина) Задайте shp = sld.Shapes.AddShape (1, 36, 500, 648 / AnzSeiten * sld.SlideNumber, 10) 'Присвояване на име за лентата на прогреса; е необходимо, за да можете да изтриете лентата по-късно. shp.Name = "ProBar" & sld.SlideNumber shp.Fill.ForeColor.RGB = RGB (0, 52, 104) shp.Fill.BackColor.RGB = RGB (0, 52, 104) Следващ край Sub Sub DelProbar () За всеки sld в ActivePresentation.Slides за всеки shp в sld.Shapes Ако shp.Name като "ProBar *" Thenshp.Delete End Ако Next Next End Sub
- След това можете да излезете от инструмента и да кликнете върху "Макроси" под "Инструменти за развитие".
- За да поставите лентата за напредък, маркирайте записа "EinfProbar" и потвърдете с "Изпълнение".
- Забележка: Лентата не се актуализира автоматично. Ако актуализирате презентацията си, трябва да премахнете лентата с „Макроси“> „DelProbar“ и да я поставите отново, както е описано в стъпка 7.
Този практичен съвет е базиран на Office 2010 под Windows 7. В следващия практичен съвет ще ви покажем как можете да проследявате промените в PowerPoint.