ShapeRange.MediaType property (PowerPoint)
Returns the OLE media type. Read-only.
Syntax
expression. MediaType
expression A variable that represents a ShapeRange object.
Return value
PpMediaType
Remarks
The value of the MediaType property can be one of these PpMediaType constants.
ppMediaTypeMixed |
ppMediaTypeMovie |
ppMediaTypeOther |
ppMediaTypeSound |
Example
This example sets all native sound objects on slide one in the active presentation to loop until manually stopped during a slide show.
For Each so In ActivePresentation.Slides(1).Shapes
If so.Type = msoMedia Then
If so.MediaType = ppMediaTypeSound Then
so.AnimationSettings.PlaySettings.LoopUntilStopped = True
End If
End If
Next
See also
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.