PPT播放时自动朗读文本可通过以下两种主要方式实现,具体操作如下:
一、使用PPT自带「录制旁白」功能(推荐)
-
操作步骤
-
选中需要朗读的文本框,点击「幻灯片放映」→「录制旁白」。
-
使用麦克风录制旁白内容,录制完成后,幻灯片角落会出现小喇叭图标,放映时自动播放。
-
-
优势
- 无需额外软件,直接集成在PPT中,支持专业播音腔调,适合培训、报告等场景。
二、通过VBA宏实现自动朗读
-
启用宏设置
- 进入「信任中心」→「宏设置」,启用所有宏。
-
编写VBA代码
-
按
ALT+F11
打开VBA编辑器,插入模块并添加以下代码: $$ \begin{Sub MyRead()
Dim s As Object, ss As String, tmpShape As Shape, tmpSlide As Slide
For Each tmpShape In ActivePresentation.SlideShowWindow.View.Slide.Shapes
If tmpShape.HasTextFrame Then
With tmpShape.TextFrame.TextRange
ss = ss & .Text + ",," & Chr(13) & Chr(10) & "..." ' 标点符号作为停顿
End With
End If
Next tmpShape
Set s = CreateObject("sapi.spvoice")
s.Rate = 1
s.Speak ss, 1
End Sub
$$ -
代码会遍历所有文本框,按指定语速朗读文本。
-
注意事项
-
兼容性 :VBA宏仅适用于Office 2013及以上版本。
-
测试 :建议先测试文本朗读效果,避免正式演示时出现卡顿或音质问题。
以上方法可根据需求选择,快速实现PPT文本的自动朗读功能。