Returns the OLE media type. Read-only.
expression. MediaType
expression A variable that represents a Shape object.
PpMediaType
The value of the MediaType property can be one of these PpMediaType constants.
| ppMediaTypeMixed |
| ppMediaTypeMovie |
| ppMediaTypeOther |
| ppMediaTypeSound |
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