利用VBA编程实现PowerPoint文稿格式编辑自动化-精选文档

'设置占位符的大小为容纳其边界内的文本而自动更改。

MyDocument.Shapes.Placeholders(j).TextFrame.AutoSize = ppAutoSizeShapeToFitText

'下面是对占位符中文本的首行缩进和左缩进进行处理 With

MyDocument.Shapes.Placeholders(j).TextFrame.Ruler.Levels(1)

.FirstMargin = 0 .LeftMargin = 0 End With

'下面是对占位符中文本的字体格式进行处理 With

MyDocument.Shapes.Placeholders(j).TextFrame.TextRange.Font

.NameAscii = \宋体\ .NameOther = \宋体\ .NameFarEast = \宋体\ .Bold = True If

Mydocument.Shapes.Placeholders(j).PlaceholderFormat.Type _= ppPlaceholderSubtitle Then

.Size = 32 '如果是标题版式幻灯片中的子标题 Else .Size = 28 End If End With Next j End Sub 4 总结

在Microsoft Office套件中使用VBA编程，其关健在于理解Office应用软件中的对象和对象模型，以及一个对象在对象模型中的位置。只有弄清楚了对象模型，才能找到对象在对象模型中的位置，了解对象所具有的方法和属性，并通过编程去调用对象的方法或修改对象的属性，以达到应用程序自动化的目的。