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:

ksywa:

tu wpisz cyfrę cztery: (to takie zabezpieczenie antyspamowe)

komentarze wulgarne albo co mi się nie spodobają będę kasował


powrot na strone glowna

RSS