Propriedade ShapeRange.MediaType (PowerPoint)
Retorna o tipo de mídia OLE. Somente leitura.
Sintaxe
expression. MediaType
Expressão Uma variável que representa um objeto ShapeRange .
Valor de retorno
PpMediaType
Comentários
O valor da propriedade MediaType pode ser uma destas constantes PpMediaType.
ppMediaTypeMixed |
ppMediaTypeMovie |
ppMediaTypeOther |
ppMediaTypeSound |
Exemplo
Este exemplo define todos os objetos de som nativos no slide um da apresentação ativa, para fazerem o loop até serem interrompidos manualmente, durante uma apresentação de slides.
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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.