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 Next Next End Sub Office PowerPoint使您可以快速创建极具感染力的动态演示文稿,同时集成更为安全的工作流和方法以轻松共享这些信息。 |
温馨提示:喜欢本站的话,请收藏一下本站!