本示例为当前演示文稿的幻灯片母版的正文文本的大纲级别 1 设置首行缩进和悬挂缩进,再设置该级别文本的字体名称和大小。
With Application.ActivePresentation _
.SlideMaster.TextStyles(ppBodyStyle)
With .Ruler.Levels(1) ' sets indents for level 1
.FirstMargin = 9
.LeftMargin = 54
End With
With .Levels(1).Font ' sets text formatting for level 1
.Name = "arial"
.Size = 36
End With
End With