本示例设置当前演示文稿的第一张幻灯片标题颜色。

Set mySlides = ActivePresentation.Slides.Range(1)
mySlides.ColorScheme.Colors(wpTitle).RGB = RGB(0, 255, 0)