Classe RotationEffect (PowerPoint VBA)

A classe RotationEffect representa um efeito de rotação para um objeto AnimationBehavior.

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

Dim ret as RotationEffect
Set ret = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).Behaviors(1).RotationEffect

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

By

Define ou retorna um valor único que representa a rotação de um objeto pelo número especificado de graus; Por exemplo, um valor 180 significa girar o objeto 180 graus. Leitura/gravação.

O objeto especificado será girado, com o centro do objeto permanecendo na mesma posição na tela. Se as propriedades by e to forem definidas para um efeito de rotação , o valor da propriedade será ignorado. Números em ponto flutuante (por exemplo, 55,5) são válidos, mas não números negativos. Não confunda essa propriedade com as propriedades ByX ou ByY dos objetos ScaleEffect e MotionEffect , que são usadas somente para efeitos de dimensionamento ou movimentação.

ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).Behaviors(1).RotationEffect.By = 270

From

Define ou retorna um valor único que representa o ângulo inicial em graus, especificada em relação à tela por exemplo, 90 graus é completamente horizontal. Leitura/gravação.

Use essa propriedade junto com a propriedade To para mudar de um ângulo de rotação para outro. O valor padrão é vazio, caso em que a posição atual do objeto é usada. 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.

ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).Behaviors(1).RotationEffect.From = 90

To

Define ou retorna um valor único que representa a rotação final de um objeto em graus, especificada em relação à tela por exemplo, 90 graus é completamente horizontal. Leitura/gravação.

Use essa propriedade em conjunto com a propriedade From para fazer a transição de um ângulo de rotação para outro. O valor padrão é vazio, caso em que a posição atual do objeto é usada. 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.

ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).Behaviors(1).RotationEffect.To = 270