PowerPoint中可批量统一字体：一、用“替换字体”功能一键更换指定源字体；二、修改幻灯片母版设置默认标题与正文样式；三、运行VBA宏强制遍历所有形状重设文本字体。
如果您在PowerPoint中需要将整个演示文稿的字体风格统一调整，例如将所有标题和正文替换为指定字体，但逐页手动修改耗时费力，则可通过内置功能或辅助操作实现全局字体批量替换。以下是解决此问题的步骤：
成品ppt在线生成，百种模板可供选择☜☜☜☜☜点击使用；
一、使用“替换字体”功能
PowerPoint提供原生的字体替换工具，可一次性扫描并替换文档中所有已应用的某种字体为另一种字体，适用于已知需替换的源字体名称的情况。
1、打开PPT文件，点击顶部菜单栏的开始选项卡。
2、在“编辑”功能区中找到并点击替换下拉按钮，选择替换字体。
3、在弹出窗口中，于“将字体替换为”下拉菜单选择目标字体（如“微软雅黑”）。
4、在“将以下字体替换为”列表中，勾选一个或多个当前使用的源字体（如“宋体”“黑体”“Arial”），确保覆盖全部需替换字体。
5、点击替换按钮，系统自动完成全文本框、形状内文本、艺术字等所有对象的字体变更。
二、修改幻灯片母版字体
通过编辑母版，可从根本上设定所有新建及已有幻灯片的默认字体样式，对未手动更改过字体的占位符内容生效，是实现长期统一字体最规范的方式。
1、点击顶部菜单栏的视图选项卡，选择幻灯片母版。
2、在左侧缩略图窗格中，选中最上方的主母版（编号为1的幻灯片）。
3、依次点击各占位符（如“单击此处编辑母版标题样式”“单击此处编辑母版文本样式”），在开始选项卡中设置所需字体、字号与颜色。
4、完成设置后，点击关闭母版视图，所有基于该母版的幻灯片标题与正文将按新样式更新（手动修改过的文本需另行处理）。
三、使用VBA宏批量重设文本字体
当PPT中存在大量手动设置字体的文本框、图形、表格单元格或艺术字，且无法通过母版或替换字体覆盖时，VBA脚本可强制遍历所有形状并统一赋值字体，适用高定制化批量操作场景。
1、按Alt + F11打开VBA编辑器，点击插入 → 模块。
2、在空白代码窗口中粘贴以下脚本（以将所有文本设为“思源黑体 Bold”为例）：
Sub SetAllTextFont()
Dim sld As Slide
Dim shp As Shape
For Each sld In ActivePresentation.Slides
For Each shp In sld.Shapes
If shp.HasTextFrame Then
If shp.TextFrame.HasText Then
shp.TextFrame.TextRange.Font.Name = "思源黑体 Bold"
End If
End If
Next shp
Next sld
End Sub
3、将代码中"思源黑体 Bold"替换为实际目标字体名称（注意中英文名须与系统安装字体完全一致）。
4、按F5运行宏，脚本执行完毕后所有幻灯片中的可编辑文本将被强制更改为指定字体。
