Clase MediaFormat (PowerPoint VBA)

Contiene métodos y propiedades que permiten tener acceso a los medios de audio y video y controlarlos.

Set

Para usar una variable de clase MediaFormat, primero debe ser instanciado, por ejemplo

Dim mft as MediaFormat
Set mft = ActiveWindow.RangeFromPoint.MediaFormat

Los siguientes procedimientos se pueden usar para establecer variables de clase MediaFormat : Shape.MediaFormat y ShapeRange.MediaFormat

Temas

Algunos procedimientos de esta clase se han agrupado en temas y se describen en páginas temáticas separadas

Format with its procedures SampleHeight y SampleWidth
Display/Show with its procedures SetDisplayPicture y SetDisplayPictureFromFile

Métodos

Otros Métodos

Resample - Agrega el objeto actual de medios a la cola y comienza un nuevo muestreo, sobre la base de los parámetros especificados.

ActiveWindow.RangeFromPoint.MediaFormat.Resample

Propiedades

AudioCompressionType Devuelve el formato de compresión de audio. Solo lectura.

Dim strAudioCompressionType As String
strAudioCompressionType = ActiveWindow.RangeFromPoint.MediaFormat.AudioCompressionType

AudioSamplingRate Devuelve la frecuencia de muestreo de audio por segundo para los medios. Solo lectura.

Dim lngAudioSamplingRate As Long
lngAudioSamplingRate = ActiveWindow.RangeFromPoint.MediaFormat.AudioSamplingRate

EndPoint Obtiene o establece la hora del punto final de la región de recorte de los medios. Lectura y escritura.

ActiveWindow.RangeFromPoint.MediaFormat.EndPoint =

FadeInDuration Obtiene o establece la duración del efecto de fundido de entrada de los medios, en milisegundos. Lectura y escritura.

ActiveWindow.RangeFromPoint.MediaFormat.FadeInDuration =

FadeOutDuration Obtiene o establece la duración del efecto de fundido de salida de los medios, en milisegundos. Lectura y escritura.

ActiveWindow.RangeFromPoint.MediaFormat.FadeOutDuration =

IsEmbedded Devuelve si el archivo multimedia está incrustado. Solo lectura.

Dim booIsEmbedded As Boolean
booIsEmbedded = ActiveWindow.RangeFromPoint.MediaFormat.IsEmbedded

IsLinked Devuelve si el archivo multimedia está vinculado. Solo lectura.

Dim booIsLinked As Boolean
booIsLinked = ActiveWindow.RangeFromPoint.MediaFormat.IsLinked

Length Devuelve la duración total de los medios en unidades de tiempo. Solo lectura.

Dim lngLength As Long
lngLength = ActiveWindow.RangeFromPoint.MediaFormat.Length

MediaBookmarks Devuelve una colección MediaBookmarks que representa los marcadores de medios asociados con el objeto especificado. Solo lectura.

Dim mbsMediaBookmarks As MediaBookmarks
Set mbsMediaBookmarks = ActiveWindow.RangeFromPoint.MediaFormat.MediaBookmarks

Muted Devuelve si la reproducción de audio de los medios está desactivada. Lectura y escritura

ActiveWindow.RangeFromPoint.MediaFormat.Muted = True

Parent Devuelve el objeto primario del objeto especificado. Solo lectura.

Dim objParent As Object
Set objParent = ActiveWindow.RangeFromPoint.MediaFormat.Parent

ResamplingStatus Devuelve el estado de la tarea de un nuevo muestreo. Solo lectura.

Dim pmtsResamplingStatus As PpMediaTaskStatus
pmtsResamplingStatus = ActiveWindow.RangeFromPoint.MediaFormat.ResamplingStatus

StartPoint Obtiene o establece el punto inicial de la región de recorte. Lectura y escritura.

ActiveWindow.RangeFromPoint.MediaFormat.StartPoint =

VideoCompressionType Devuelve una cadena que representa el formato de compresión de vídeo de los medios. Solo lectura.

Dim strVideoCompressionType As String
strVideoCompressionType = ActiveWindow.RangeFromPoint.MediaFormat.VideoCompressionType

VideoFrameRate Devuelve la velocidad de fotogramas de vídeo por segundo para los medios. Solo lectura.

Dim lngVideoFrameRate As Long
lngVideoFrameRate = ActiveWindow.RangeFromPoint.MediaFormat.VideoFrameRate

Volume Obtiene o establece el volumen de los medios. Lectura y escritura.

ActiveWindow.RangeFromPoint.MediaFormat.Volume =