AnimationSettings.DimColor-Eigenschaft (PowerPoint)
Gibt ein ColorFormat -Objekt zurück, das die Farbe der angegebenen Form nach deren Aufbau darstellt, oder legt dieses Objekt fest. Schreibgeschützt.
Syntax
Ausdruck. DimColor
Ausdruck Eine Variable, die ein AnimationSettings-Objekt darstellt.
Rückgabewert
ColorFormat
Hinweise
Wenn Sie den Effekt nicht, den Sie erwarten erhalten, überprüfen Sie die anderen Buildeinstellungen. Sie werden nicht den Effekt der DimColor -Eigenschaft finden Sie, wenn die TextLevelEffect -Eigenschaft des AnimationSettings -Objekts auf einen anderen Wert als PpAnimateLevelNone festgelegt ist, die AfterEffect -Eigenschaft ppAfterEffectDim festgelegt wird und die Animate -Eigenschaft auf True festgelegt ist. Darüber hinaus ist die angegebene Form einziges Element oder das letzte Element auf der Folie erstellt werden, werden nicht die Form abgeblendet angezeigt. Um die Buildreihenfolge der Formen auf einer Folie zu ändern, verwenden Sie die AnimationOrder -Eigenschaft.
Beispiel
In diesem Beispiel wird zur aktiven Präsentation eine Folie hinzugefügt, die sowohl einen Titel als auch eine Liste mit drei Elementen enthält, und festgelegt, dass der Titel und die Liste nach dem Aufbau abgetönt werden. Außerdem wird die jeweilige Farbe für das Abtönen festgelegt.
With ActivePresentation.Slides.Add(2, ppLayoutText).Shapes
With .Item(1)
.TextFrame.TextRange.Text = "Sample title"
With .AnimationSettings
.TextLevelEffect = ppAnimateByAllLevels
.AfterEffect = ppAfterEffectDim
.DimColor.SchemeColor = ppShadow
.Animate = True
End With
End With
With .Item(2)
.TextFrame.TextRange.Text = "Item one" _
& Chr(13) & "Item two"
With .AnimationSettings
.TextLevelEffect = ppAnimateByFirstLevel
.AfterEffect = ppAfterEffectDim
.DimColor.RGB = RGB(100, 150, 130)
.Animate = True
End With
End With
End With
Siehe auch
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.