2018.02.10 06:46
łączny czas prezentacji z Powerpoincie
Jak mam w Powerpoincie prezentację z nagranymi czasami slajdów a chcę zobaczyć łączny czas całej prezentacji, to da się to sprawdzić takim makrem:
Sub czasy()
Dim slajd As slide
Dim czas As Double
czas = 0
For Each slajd In ActivePresentation.Slides
czas = czas + slajd.SlideShowTransition.AdvanceTime
Next
MsgBox "cala prezentacja trwa " & czas & " sekund"
End Sub
komentarze:
powrót na stronę główną
RSS