Question

返回或设置一个ColorFormat 对象，该对象代表指定形状创建后的颜色。只读。

说明

如果没有达到预期的效果，请检查其他的创建设置。必须将AnimationSettings 对象的TextLevelEffect 属性设为非ppAnimateLevelNone 的值，AfterEffect 属性设为ppAfterEffectDim，且Animate 属性设为True，才能看到DimColor 属性的效果。另外，如果指定形状是幻灯片中唯一的或最后一个，则该形状无法变暗。要改变幻灯片中形状的创建顺序，可使用AnimationOrder 属性。

示例

本示例在当前演示文稿中添加一张幻灯片。该幻灯片包含一个标题和一个三项目的列表。本示例设置标题和列表在创建后变暗，并设置它们变暗的颜色。

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