Presentation.CreateVideoStatus (PowerPoint)

Returns the status of creating a video in the current Presentation. Possible return values are ppMediaTaskStatusDone - Done, ppMediaTaskStatusFailed - Failed, ppMediaTaskStatusInProgress - In progress, ppMediaTaskStatusNone - No status, ppMediaTaskStatusQueued - Queued.

Dim pmtsCreateVideoStatus As PpMediaTaskStatus
pmtsCreateVideoStatus = ActivePresentation.CreateVideoStatus