Delay calculation in PPT 2016

JohnWilson · #2 05-10-2017, 08:16 AM

I know you understand exactly what you mean but it really isn't that clear

But

Why do you think ActivX TextBoxes on the master do not work - they do.

You could try this to run a mcro at slide xx

Code:

Sub OnSlideShowPageChange(SW As SlideShowWindow)
If SW.View.CurrentShowPosition = xx Then 'the slide in question
Call themacro
End If
End Sub

You can address an ActivX textbox called "TextBox1" on slide 3 like this

strText=ActivePresentation.Slides(3).Shapes("TextB ox1").OLEFormat.Object.Text

If you measure the value od NOW at two points in the presentation you can use DateDiff to get the elapsed time

Code:

 Public d_then As Date

Sub getEarlier()
d_then = Now
End Sub

Sub getElapsed()
MsgBox DateDiff("s", d_then, Now) & _
" seconds have elapsed.", vbInformation
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Sending e-mail with delay	paik1002	Outlook	1	02-29-2016 11:27 AM
Auto run macro with delay	bremen22	Excel Programming	0	02-04-2016 06:53 AM
Delay Analysis	ketanco	Project	3	03-15-2013 01:06 PM
Using the Delay fields	Foxfire	Mail Merge	5	08-20-2011 02:40 AM
Delay delivery	Registrar	Outlook	1	07-01-2010 10:17 AM