PPT批量修改幻灯片字体、大小、颜色的方法 _知识经验

只需要将以下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参数表示
【PPT批量修改幻灯片字体、大小、颜色的方法】End With
End If
Next
Next
End Sub

PPT批量修改幻灯片字体、大小、颜色的方法

推荐阅读

心比柠檬酸是什么意思

手机无法接通怎么处理手机无法接通怎么处理

粉红丝带的含义是什么

洋葱炒鸡蛋的做法

教大家iPhone6定位服务找不到QQ怎么办的方法

如何评价一堂初中英语课？

如何给孩子选择兴趣班坚持最重要

正规油罐车可以流动卖柴油吗一吨柴油有多少升

彼得潘作者简介彼得潘作者简介是什么

台球都有几种颜色台球的科普

赵括是哪个朝代的赵括是什么朝代的人

一什么晚霞填量词一个一晚霞填量词是什么

“普茶”即“濮茶”辨考

糖醋虾的做法

疲城演员表疲城剧情简介

夜光漂电池能充电吗？

南瓜与什么搭配最好南瓜不能和什么一起吃

QQ飞车手游情侣如何分手？

ps4能玩ps3游戏吗

腐化装备净化了怎么办