Clase EffectInformation (PowerPoint VBA)

La clase EffectInformation representa varias opciones de animación para un objeto Effect.

Set

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

Dim ein as EffectInformation
Set ein = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).EffectInformation

Las variables de tipo EffectInformation se pueden establecer utilizando el procedimiento Effect.EffectInformation

AfterEffect

Devuelve una constante PpAfterEffect que indica si un efecto posterior aparece atenuado, oculto o sin cambios después de ejecutarlo. Solo lectura.

Valores posibles son msoAnimAfterEffectDim - Atenuado, msoAnimAfterEffectHide - Oculta, msoAnimAfterEffectHideOnNextClick - Hidden on the next mouse clickHidden on the next mouse click, msoAnimAfterEffectMixed - Mixto, msoAnimAfterEffectNone - Sin cambios.

El valor devuelto por la propiedad AfterEffect puede ser una de estas constantes PpAfterEffect .

Dim maaAfterEffect As MsoAnimAfterEffect
maaAfterEffect = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.AfterEffect

AnimateBackground

Devuelve msoTrue si el efecto especificado es una animación de fondo. Solo lectura.

Utilice las propiedades TextLevelEffecty TextUnitEffect para controlar la animación del texto adjunto a la forma especificada. Si esta propiedad se establece en msoTrue y la propiedad TextLevelEffect se establece en ppAnimateByAllLevels, la forma y su texto se animan simultáneamente. Si se establece esta propiedad en msoTrue y la propiedad TextLevelEffect está establecida en cualquier valor distinto de ppAnimateByAllLevels, la forma se anima inmediatamente antes de que la animación del texto. No verá los efectos de establecer esta propiedad a menos que la forma especificada se anima. Para animar una forma, la propiedad TextLevelEffect de la forma debe tener un valor distinto de ppAnimateLevelNone, y la propiedad Animate debe establecerse en msoTrue, o bien la propiedad EntryEffect debe establecerse en una constante distinta de ppEffectNone. El valor devuelto por la propiedad AnimateBackground puede ser una de estas constantes MsoTriState .

Dim mtsAnimateBackground As Office.MsoTriState
mtsAnimateBackground = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.AnimateBackground

AnimateTextInReverse

Determina si la forma especificada se anima en orden inverso. Se aplica solo a formas (como, por ejemplo formas que contienen listas) que se pueden animar en más de un paso. Lectura y escritura.

El valor de la propiedad AnimateTextInReverse puede ser una de estas constantes MsoTriState .

Dim mtsAnimateTextInReverse As Office.MsoTriState
mtsAnimateTextInReverse = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.AnimateTextInReverse

BuildByLevelEffect

Determina el nivel del efecto de creación de la animación. Solo lectura.

Valores posibles son msoAnimateChartAllAtOnce - Animar todo el gráfico a la vez, msoAnimateChartByCategory - Animar el gráfico por categorías, msoAnimateChartByCategoryElements - Animar el gráfico por elementos de la categoría, msoAnimateChartBySeries - Animar el gráfico por series, msoAnimateChartBySeriesElements - Animar el gráfico por elementos de la serie, msoAnimateDiagramAllAtOnce - Animar todo el diagrama a la vez, msoAnimateDiagramBreadthByLevel - Animar la amplitud del diagrama por niveles, msoAnimateDiagramBreadthByNode - Animar la amplitud del diagrama por nodos, msoAnimateDiagramClockwise - Animar el diagrama en el sentido de las agujas del reloj, msoAnimateDiagramClockwiseIn - Animar el diagrama en el sentido de las agujas del reloj hacia dentro, msoAnimateDiagramClockwiseOut - Animar el diagrama en el sentido de las agujas del reloj hacia fuera, msoAnimateDiagramCounterClockwise - Animar el diagrama en el sentido contrario de las agujas del reloj, msoAnimateDiagramCounterClockwiseIn - Animar el diagrama en el sentido contrario de las agujas del reloj hacia dentro, msoAnimateDiagramCounterClockwiseOut - Animar el diagrama en el sentido contrario de las agujas del reloj hacia fuera, msoAnimateDiagramDepthByBranch - Animar la profundidad del diagrama por ramas, msoAnimateDiagramDepthByNode - Animar la profundidad del diagrama por nodos, msoAnimateDiagramDown - Animar el diagrama hacia abajo, msoAnimateDiagramInByRing - Animar el diagrama hacia dentro por anillos, msoAnimateDiagramOutByRing - Animar el diagrama hacia fuera por anillos, msoAnimateDiagramUp - Animar el diagrama hacia arriba, msoAnimateLevelMixed - Animar niveles combinados, msoAnimateLevelNone - No animar ningún nivel, msoAnimateTextByAllLevels - Animar el texto por todos los niveles, msoAnimateTextByFifthLevel - Animar el texto por el quinto nivel, msoAnimateTextByFirstLevel - Animar el texto por el primer nivel, msoAnimateTextByFourthLevel - Animar el texto por el cuarto nivel, msoAnimateTextBySecondLevel - Animar el texto por el segundo nivel, msoAnimateTextByThirdLevel - Animar el texto por el tercer nivel.

El valor devuelto por la propiedad BuildByLevelEffect puede ser una de estas constantes MsoAnimateByLevel .

Dim mabBuildByLevelEffect As MsoAnimateByLevel
mabBuildByLevelEffect = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.BuildByLevelEffect

Dim

Devuelve un objeto ColorFormat que representa el color que se atenúa al finalizar una animación.

Dim cftDim As ColorFormat
Set cftDim = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.Dim

Parent

Devuelve el objeto primario del objeto especificado.

PlaySettings

Devuelve un objeto PlaySettings que contiene información acerca de cómo se reproduce el clip multimedia especificado durante una presentación con diapositivas. Solo lectura.

Dim pssPlaySettings As PlaySettings
Set pssPlaySettings = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.PlaySettings

SoundEffect

Devuelve un objeto SoundEffect que representa el sonido que se reproducirá durante la transición a la diapositiva especificada. Solo lectura.

Dim setSoundEffect As SoundEffect
Set setSoundEffect = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectInformation.SoundEffect

TextUnitEffect

Indica si el texto de la forma especificada está animado por párrafos, por palabras o por letras. Solo lectura.

Valores posibles son msoAnimTextUnitEffectByCharacter - Por carácter, msoAnimTextUnitEffectByParagraph - Por párrafo, msoAnimTextUnitEffectByWord - Por palabra, msoAnimTextUnitEffectMixed - Efecto mixto.

El valor de la propiedad TextUnitEffect puede ser una de estas constantes MsoAnimTextUnitEffect .

Dim matTextUnitEffect As MsoAnimTextUnitEffect
matTextUnitEffect = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).EffectInformation.TextUnitEffect