可使用ppt“替换字体”功能批量修改全文档字体：在“开始”→“替换”→“替换字体”中指定源字体与目标字体后点击“替换”即可；辅以“幻灯片母版”设置默认字体，确保新增内容自动应用；混用多字体时可用vba宏遍历强制替换中文字符字体。
如果您在编辑PPT时需要将整份演示文稿中的所有字体统一更换为另一种字体，但逐页逐文本框修改耗时费力，则可通过PPT内置的“替换字体”功能快速完成。以下是实现该目标的具体操作步骤：
成品ppt在线生成，百种模板可供选择☜☜☜☜☜点击使用；
一、使用PPT内置“替换字体”功能
PowerPoint提供原生的字体批量替换工具，可一次性扫描并替换当前演示文稿中所有使用指定字体的文本，包括标题、正文、形状内文字及文本框内容，无需手动选中任何对象。
1、打开需修改字体的PPT文件，点击顶部菜单栏的“开始”选项卡。
2、在“编辑”功能区中，点击“替换”下拉箭头，选择“替换字体”。
3、在弹出窗口中，“将字体替换为”下拉列表选择目标字体（如“微软雅黑”）。
4、在“将字体替换为”上方的“替换”下拉列表中，选择当前文档中实际使用的源字体（如“宋体”或“黑体”）。
5、点击“替换”按钮，系统自动完成全文档字体映射更新。
二、通过“幻灯片母版”统一修改默认字体
若希望新插入的文本框、占位符及后续新增页面均自动应用指定字体，需修改母版中的默认中英文西文字体设置，该方式影响全局样式基准，对已存在但未继承母版格式的文本不生效，需配合方法一使用。
1、点击顶部菜单栏的“视图”选项卡，选择“幻灯片母版”。
2、在左侧缩略图窗格中，选中最顶层的主母版幻灯片（编号为1）。
3、点击“幻灯片母版”选项卡中的“字体”按钮，选择“自定义字体”。
4、在弹出窗口中，为中文标题字体、中文正文字体、西文标题字体、西文正文字体分别指定目标字体（如全部设为“思源黑体 CN Medium”）。
5、点击“保存”，关闭母版视图，所有基于该母版的新文本将自动采用新字体。
三、利用VBA宏实现跨字体族全自动替换
当文档中混用多种源字体（如同时含“仿宋”“楷体”“华文细黑”），且需将全部中文字体无差别替换为单一目标字体时，内置替换功能需多次操作；VBA脚本可遍历所有幻灯片、形状、文本框及表格单元格，识别中文字符并强制应用指定字体，覆盖更彻底。
1、按Alt + F11打开VBA编辑器，点击“插入”→“模块”。
2、粘贴以下代码（以替换为“霞鹜文楷”为例）：
Sub ReplaceAllChineseFonts()
Dim sld As Slide
Dim shp As Shape
Dim i As Integer
For Each sld In ActivePresentation.Slides
For Each shp In sld.Shapes
If shp.HasTextFrame Then
If shp.TextFrame.HasText Then
For i = 1 To shp.TextFrame.TextRange.Runs.Count
With shp.TextFrame.TextRange.Runs(i).Font
.Name = "霞鹜文楷"
End With
Next i
End If
End If
Next shp
Next sld
End Sub
3、关闭VBA编辑器，返回PPT，按Alt + F8调出宏列表，选中“ReplaceAllChineseFonts”，点击“运行”。
