最有效的方法是先通过幻灯片母版统一修改占位符文字为黑色，再用vba宏强制遍历所有shape对象将剩余文本（文本框、艺术字、表格单元格等）设为纯黑；若全文档灰色文字均使用同一主题色，亦可直接修改该主题色定义为rgb(0,0,0)实现一键同步。
你需要把PPT里所有页面的文字颜色统一从灰色改成黑色，但一页页点开选中再改色太耗时，尤其当文件有30页以上、还夹杂着文本框、艺术字和表格单元格时，手动操作极易漏掉某几处。
AI一键生成成品PPT☜☜☜☜☜点击生成；
通过幻灯片母版统一修改占位符文字颜色
这是最干净、最源头的改法，适用于标题、副标题、正文等所有基于母版占位符插入的文本。改完后新增幻灯片自动继承新颜色，且不破坏原有排版结构。
1、点击顶部菜单栏【视图】→【幻灯片母版】进入母版编辑模式。
2、在左侧缩略图窗格中，【务必只点中最上方编号为1的主母版】，不要误点下方子版式——否则仅影响部分幻灯片。
3、依次单击母版中的“标题占位符”和“正文占位符”，在【开始】选项卡中点击【字体颜色】下拉箭头，选择“黑色”。若需精确匹配纯黑，请选“更多颜色”→“自定义”→输入R0 G0 B0。
4、关闭母版视图时，PowerPoint会弹出提示：“是否将更改应用到所有幻灯片？”→点击“是”。
这一步做完，所有使用该母版的标题与正文文字已变为黑色；但独立插入的文本框、形状内文字、表格单元格仍保持原色，需用后续方法补全。
用VBA宏强制遍历并重设全部文本颜色
当PPT里存在大量自由文本框、艺术字、SmartArt或表格单元格时，母版修改无法覆盖它们。此时必须用VBA脚本穿透所有Shape对象，逐字判断并重设颜色。
方法一：替换所有非主题色文字为黑色
1、按 Alt + F11 打开VBA编辑器。
2、在左侧“工程资源管理器”中，右键当前PPT文件名 →【插入】→【模块】。
3、在空白代码窗口中粘贴以下代码：
Sub SetAllTextToBlack()
Dim sld As Slide, shp As Shape, rng As TextRange
For Each sld In ActivePresentation.Slides
For Each shp In sld.Shapes
If shp.HasTextFrame Then
If shp.TextFrame.HasText Then
Set rng = shp.TextFrame.TextRange
rng.Font.Color = RGB(0, 0, 0)
End If
End If
Next shp
Next sld
End Sub
4、光标置于代码任意行 → 按 F5 运行宏。执行过程无提示，完成后所有文本（含文本框、艺术字、表格内文字）立即变黑。
注意：此脚本会覆盖所有文本颜色，包括原本就是黑色或已用主题色设置的文字，不可逆。运行前请先保存副本。
利用主题颜色方案间接批量更新
如果你的PPT中所有灰色文字都使用了同一个主题色（例如“文本/背景-浅色2”），那么只需改一次主题色，全文档所有引用该色的文字就会同步变黑——无需动任何文本框。
方法二：精准映射主题色到黑色
第一步：确认原文本是否真用了主题色
选中一个灰色文字 → 看【开始】选项卡中【字体颜色】下拉菜单顶部是否显示“主题颜色”分类下的某个色块（如“文本/背景-浅色2”）。如果显示的是“标准色”或“最近使用的颜色”，此法无效，跳过。
第二步：修改主题色定义
① 切换到【设计】选项卡 → 点击【变体】右下角小箭头 →【颜色】→【自定义颜色】。
② 在弹出窗口中，找到原文本所用的主题色名称（如“文本/背景-浅色2”）→ 点击其右侧色块 →【更多颜色】→ 输入R0 G0 B0 → 点击确定。
③ 点击【保存】，所有应用该主题色的文字瞬间转为纯黑。
这一步操作起来很简单，直接把主题色定义改掉就行，但前提是全文档文字颜色管理规范，否则会失效。
