MediaFormat.ResamplingStatus (PowerPoint)
Returns the resampling task status. Possible return values are ppMediaTaskStatusDone - Done, ppMediaTaskStatusFailed - Failed, ppMediaTaskStatusInProgress - In progress, ppMediaTaskStatusNone - No status, ppMediaTaskStatusQueued - Queued.
ResamplingStatus returns one of the following PpMediaTaskStatus values:
Dim pmtsResamplingStatus As PpMediaTaskStatus
pmtsResamplingStatus = ActiveWindow.RangeFromPoint.MediaFormat.ResamplingStatus