Klasse EffectParameters (PowerPoint VBA)
Die Klasse EffectParameters stellt verschiedene Animationsparameter für ein Effect -Objekt, wie Farben, Schriftarten, Größen und erfahren Sie, wie.
Um eine EffectParameters -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim eps as EffectParameters
Set eps = ActivePresentation.SlideMaster.TimeLine.MainSequence(1).EffectParameters
Klassen Variablen vom Typ EffectParameters können mit der Prozedur Effect.EffectParameters festgelegt werden
Amount
Zurückgeben oder Festlegen einer einzelnen, die die Gradzahl darstellt, das eine animierte Form um die z-Achse gedreht wird. Ein positiver Wert bedeutet Drehung im Uhrzeigersinn; ein negativer Wert bedeutet Drehung gegen den Uhrzeigersinn. Lese-/Schreibzugriff.
ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectParameters.Amount = -90
Color2
Gibt ein ColorFormat -Objekt zurück, das die Farbe darstellt, mit der eine Farbzyklusanimation beendet werden soll.
Dim cftColor2 As ColorFormat
Set cftColor2 = ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectParameters.Color2
Direction
Bestimmt die für einen Animationseffekt verwendete Richtung. Diese Eigenschaft kann nur verwendet werden, wenn für den Effekt eine Richtung verwendet wird. Lese-/Schreibzugriff. Dies sind mögliche Werte für
Der Wert der Direction -Eigenschaft kann einer der folgenden MsoAnimDirection -Konstanten sein.
ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectParameters.Direction = msoAnimDirectionAcross
FontName
Gibt den Schriftartnamen des angegebenen WordArt-Objekts zurück oder legt ihn fest. Lese-/Schreibzugriff.
ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectParameters.FontName =
Relative
Bestimmt, ob die Bewegungsposition relativ zur Position der Form festgelegt wird. Lese-/Schreibzugriff.
Diese Eigenschaft wird nur in Verbindung mit Animationspfaden verwendet. Der Wert der relative -Eigenschaft kann einer der folgenden MsoTriState -Konstanten sein.
ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectParameters.Relative = msoTrue
Size
Gibt die Schriftgröße in Punkten zurück. Lese-/Schreibzugriff.
ActiveWindow.Selection.SlideRange(1).TimeLine.MainSequence(1).EffectParameters.Size = 24