Shape.MediaType (PowerPoint)

Retorna o tipo de mídia OLE. Somente leitura. Os valores de retorno possíveis são ppMediaTypeMixed - Mista, ppMediaTypeMovie - Filme, ppMediaTypeOther - Outras pessoas, ppMediaTypeSound - Som.

O valor da propriedade MediaType pode ser uma destas constantes PpMediaType .

Dim pmtMediaType As PpMediaType
pmtMediaType = ActivePresentation.Slides(1).Shapes(1).MediaType