一键替换字体最简方案是使用“替换字体”功能，需先ctrl+a全选幻灯片再操作；母版设置可统一默认字体并重设幻灯片；主题字体方案适配标题+正文组合；vba宏实现无死角全覆盖，但不可撤销。
当你做完一份PPT，发现全篇混用了宋体、微软雅黑、黑体甚至某些下载字体，现场要交付却没时间一页一页改——这时候你需要的不是逐个选中再设置字体，而是一键覆盖全部文本的字体方案。
AI一键生成成品PPT☜☜☜☜☜点击生成；
用“替换字体”功能秒换指定字体
这是最轻量、最直接的方法，适合已知文档中只有一种或少数几种需统一替换的字体（比如把所有“华文细黑”换成“思源黑体”）。
1. 打开PPT文件 → 点击顶部【开始】选项卡 → 在右侧【替换】下拉按钮中选择【替换字体】。
2. 在弹出窗口中，上方【将以下字体替换为】下拉框里选中当前文档中实际使用的源字体（如“华文细黑”）；下方【替换为】下拉框里选目标字体（如“思源黑体”）。
3. 【关键前提】必须先按Ctrl+A全选所有幻灯片缩略图（在左侧幻灯片窗格中操作），否则默认只作用于当前页。确认状态栏显示“已选择X张幻灯片”后再点击【替换】。
4. 替换完成后，所有可编辑文本中的该字体立即更新，SmartArt、图表内文字通常也同步生效。
通过幻灯片母版重设全局默认字体
如果你希望从源头控制——新插入的文字自动用指定字体，且已有文字也能批量刷新样式，母版是唯一能真正“一劳永逸”的路径。
第一步：点击【视图】→【幻灯片母版】进入编辑模式。
第二步：在左侧缩略图中，**只点选最顶部编号为“1”的主母版幻灯片**（其他版式母版会继承它的设置，无需逐个改）。
第三步：依次单击主母版中的【标题占位符】和【正文占位符】，在【开始】选项卡中分别设置标题字体、字号与正文字体、字号。
第四步：点击【关闭母版视图】→ 返回普通视图后，右键任意一张幻灯片缩略图 → 选择【重设幻灯片】，所有已存在文本即刻应用新字体。
这一步操作起来很简单，直接把文件拖进去就行。但注意：如果某页手动修改过字体且未使用占位符（比如直接插入文本框写的字），它不会被重设覆盖，需单独处理。
用主题字体方案一键切换整套字体组合
适用于想同时定义标题+正文两套字体，并让它们像配色方案一样可复用、可迁移的场景。
方法一：点击【设计】选项卡 → 在【变体】组中点击右下角小箭头 → 选择【字体】→【自定义字体】。
方法二：在【幻灯片母版】视图中 → 点击【幻灯片母版】选项卡 → 点击【字体】下拉菜单 → 底部选择【自定义字体】。
两种入口最终都打开同一窗口：上方输入标题字体名称，下方输入正文字体名称，命名后保存。之后整个PPT所有占位符文本、新建文本框都会自动套用这套组合。
注意：此操作不会改变已有非占位符文本框的字体，仅影响后续新增及母版驱动的内容。
运行VBA宏实现无死角字体+字号全覆盖
当你的PPT里有大量独立文本框、艺术字、表格内文字、甚至文本框嵌套图形，且必须连字号、加粗、颜色一并统管时，只有VBA能做到彻底穿透。
按Alt+F11打开VBA编辑器 → 插入新模块 → 粘贴以下代码：
Sub ReplaceAllText()
Dim sld As Slide, shp As Shape
For Each sld In ActivePresentation.Slides
For Each shp In sld.Shapes
If shp.HasTextFrame Then
If shp.TextFrame.HasText Then
With shp.TextFrame.TextRange.Font
.Name = "微软雅黑"
.Size = 20
End With
End If
End If
Next shp
Next sld
End Sub
修改代码中.Name和.Size为你需要的值 → 按F5运行 → 全部幻灯片中所有可读文本即时更新，包括文本框、表格单元格、艺术字、甚至带超链接的文字。
【不可逆操作】运行前务必另存备份，VBA不提供撤销功能。
