MediaType Property

PpMediaType

PpMediaType can be one of these PpMediaType constants.
ppMediaTypeMixed
ppMediaTypeMovie
ppMediaTypeOther
ppMediaTypeSound

expression.MediaType

*expression   * Required. An expression that returns one of the objects in the Applies To list.

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

Applies to | Shape Object | ShapeRange Collection Object