我希望能够创建一个宏,该宏将在演示者笔记中的文本上启动文本到语音转换。我将把宏应用到一个 ActiveX 按钮上,它允许用户开始阅读,最终我想将幻灯片的动画计时到语音。
我在 Excel VBA 中成功写出命令来与单元格对话:
application.speech.speak (sheet1.cells(1,1))
Run Code Online (Sandbox Code Playgroud)
我找到了一个代码,可以将文本输入到所有幻灯片的演讲者备注部分。
Sub AddTextAllSpeakerNotes()
Dim sld As Slide
For Each sld In ActivePresentation.Slides
sld.NotesPage.Shapes.Placeholders(2).TextFrame.TextRange = ""
Next sld
End Sub
Run Code Online (Sandbox Code Playgroud)
我已经添加了 Microsoft Speech Object Library 参考,但我永远无法让 VBA 识别语音命令并自动完成任何有助于我弄清楚如何进一步操作的命令。
如何编写将文本转语音命令应用于特定幻灯片的演讲者备注部分的代码。