Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Stellt verschiedene Animationsparameter für ein Effect -Objekt, wie Farben, Schriftarten, Größen und erfahren Sie, wie.
Beispiel
Verwenden Sie die EffectParameters -Eigenschaft des Effect -Objekts, um ein EffectParameters -Objekt zurückzugeben. Im folgenden Beispiel wird eine Form erstellt, ein Fülleffekt festgelegt und ändert das Start- und Enddatum Füllfarben.
Sub effParam()
Dim shpNew As Shape
Dim effNew As Effect
Set shpNew = ActivePresentation.Slides(1).Shapes _
.AddShape(Type:=msoShapeHeart, Left:=100, _
Top:=100, Width:=150, Height:=150)
Set effNew = ActivePresentation.Slides(1).TimeLine.MainSequence _
.AddEffect(Shape:=shpNew, EffectID:=msoAnimEffectChangeFillColor, _
Trigger:=msoAnimTriggerAfterPrevious)
With effNew.EffectParameters
.Color1.RGB = RGB(Red:=0, Green:=0, Blue:=255)
.Color2.RGB = RGB(Red:=255, Green:=0, Blue:=0)
End With
End Sub
Siehe auch
PowerPoint-Objektmodellreferenz
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.