Classe PropertyEffect (PowerPoint VBA)

A classe PropertyEffect representa um efeito de propriedade para um objeto AnimationBehavior.

Para usar uma variável de classe PropertyEffect, ela primeiro precisa ser instanciada por exemplo

Dim pet as PropertyEffect
Set pet = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).Behaviors(1).PropertyEffect

As variáveis ​​de classe PropertyEffect podem ser definidas usando o procedimento AnimationBehavior.PropertyEffect.

From

Define ou retorna um valor que representa o valor inicial da propriedade de um objeto. Leitura/gravação.

a propriedade from é semelhante à propriedade Points , mas usar a propriedade from é mais fácil para tarefas simples. O valor padrão é vazio, nesse caso, a posição atual do objeto será usado. Não confunda esta propriedade com a FromX ou FromY propriedades dos objetos ScaleEffect e MotionEffect, que são usadas somente para efeitos de dimensionamento ou movimentação.

ActivePresentation.SlideMaster.TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.From =

Points

Retorna um objeto AnimationPoints que representa um ponto em uma animação.

Use as propriedades from e to para definir o valor dessa propriedade.

Dim apsPoints As AnimationPoints
Set apsPoints = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.Points

Property

Define ou retorna uma constante de MsoAnimProperty que representa uma propriedade de animação. Leitura/gravação. Aqui você pode encontrar os valores possíveis para MsoAnimProperty.

ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.Property = msoAnimColor

To

Define ou retorna um valor que representa o valor final da propriedade de um objeto. Leitura/gravação.

O valor padrão é vazio, nesse caso, a posição atual do objeto será usado. Não confunda esta propriedade com a ToX ou ToY propriedades dos objetos ScaleEffect e MotionEffect, que são usadas somente para efeitos de dimensionamento ou movimentação.

ActivePresentation.SlideMaster.TimeLine.MainSequence(1).Behaviors(1).PropertyEffect.To =