PPT大局部更改幻灯片字体、大小、颜色的办法|雨林木风下载站

Microsoft Office PowerPoint是指微软公司的演示文稿软件。Microsoft Office PowerPoint做出来的东西叫演示文稿，其格式后缀名为：ppt、pptx；或者也可以保存为：pdf、图片格式等。

只需要将以下VBA代码中红色字体，替换成需要更改的字体参数，然后将修改完成的VBA代码放入VBA编辑器中运行即可!只适合PPT2007及其以上版本!

Sub change()

Dim oShape As Shape

Dim oSlide As Slide

Dim oTxtRange As TextRange

On Error Resume Next

For Each oSlide In ActivePresentation.Slides

For Each oShape In oSlide.Shapes

Set oTxtRange = oShape.TextFrame.TextRange

If Not IsNull(oTxtRange) Then

With oTxtRange.Font

.Name = "楷体_GB2312" '更改为需要的字体

.Size = 15 '改为所需的文字大小

.Color.RGB = RGB(Red:=255, Green:=120, Blue:=0) '改成想要的文字颜色，用RGB参数表示

End With

End If

End Sub

Office PowerPoint使您可以快速创建极具感染力的动态演示文稿，同时集成更为安全的工作流和方法以轻松共享这些信息。

……