已经做好了的PPT怎么批量改字体颜色?

发布网友 发布时间：2022-02-22 05:42

我来回答

共3个回答

懂视网 时间：2022-02-22 10:04

ppt统一换字体颜色的方法：

【1】首先打开ppt

并且处于左边有导航的视图情况下

【2】其次

在左边的导航中

默认显示的是【幻灯片】视图

将之切换到【大纲】视图

【3】这样，就可以看到

所有的文字信息都以大纲形式显示出来了

接下来，对所有的文字进行全选

可以使用快捷键：【ctrl+A】

【4】接下来

可以对所有的文字进行操作了

可以选择需要的字体

【5】同样

还可以改变字体的大小

加粗，倾斜等

【6】最后

修改完后

切换回【幻灯片】视图

就可以看到刚刚已经修改后的效果了

热心网友 时间：2022-02-22 07:12

你知道改模板可以把字变为黑色。改不了符号可能：它是公式，鼠标右键点它-设置图片格式-图片-重新着色。2、它是文本框

热心网友 时间：2022-02-22 08:30

一次性修改所有ppt页面中字体的颜色和大小
有朋友问我如何一次性修改所有ppt页面中字体的颜色和大小，由于powerpoint没有现成的菜单，今天索性写了一个宏，水平有限，不足之处请大家指正！
Sub Macro1()
For i = 1 To ActiveWindow.Selection.SlideRange.SlideNumber
num = ActiveWindow.Selection.SlideRange.Shapes.Count
If i = ActiveWindow.Selection.SlideRange.SlideNumber Then
num = num - 1
End If
For j = 1 To num

ActiveWindow.View.GotoSlide Index:=i
aaa = ActiveWindow.Selection.SlideRange.Shapes(j).Name
If InStr(1, aaa, "text box") > 0 Then
ActiveWindow.Selection.SlideRange.Shapes(j).Select
ActiveWindow.Selection.ShapeRange.TextFrame.TextRange.Select
ActiveWindow.Selection.ShapeRange.TextFrame.TextRange.Font.Size = 20 '改成你想要的字体大小
ActiveWindow.Selection.TextRange.Font.Color.RGB = RGB(Red:=255, Green:=0, Blue:=0) '改成你想要的字体颜色
End If
If InStr(1, aaa, "Rectangle") > 0 Then
ActiveWindow.Selection.SlideRange.Shapes(j).Select
ActiveWindow.Selection.TextRange.Font.Size = 20 '改成你想要的字体大小
ActiveWindow.Selection.TextRange.Font.Color.RGB = RGB(Red:=255, Green:=0, Blue:=0) '改成你想要的字体颜色
End If
Next j
Next i
End Sub