WORD调用Excel的“文本到语音”功能,让WORD有声朗诵

来源:互联网 发布:战国 知乎 编辑:程序博客网 时间:2024/05/17 01:36
基本思想:利用VBA代码调用Excel中自带的“文本到语音”功能。
  
  在Word中键入“Alt+F11”组合键,打开Visual Basic编辑器, 创建一个名为ReadRec的宏,代码如下:
  
  Sub ReadSelection()
    Excel.Application.speech.speak Selection
  End Sub
  
  接下来必须建立Word与Excel两程序间的关联。方法是:
       单击VBE编辑器窗口中的“工具”菜单,选择“引用”命令,在弹出的“引用-Normal”对话框中选择“Microsoft Excel 11.0 Object Library”复选框,设置完成后单击“确定”按钮,关闭Visual Basic编辑器返回Word窗口。
  最后将创建的宏拖放到工具栏中。方法是:
  右击工具栏,选择“自定义”命令,切换到“命令”选项卡,在“类别”中选择“宏”,将命令中的“Normal NewMacros.ReadSelection”拖放到工具栏中就可以使用了,同时最好给该按钮更改一下按钮的“命名”(如“阅读文档”)和默认的按钮图像(在未关闭“自定义”对话框时右击工具栏中的该按钮就可以进行相应的设置了),这样就更加方便我们使用了。
  使用时,选中需要阅读的文本,然后再单击工具栏中的“阅读文档”按钮,这时我们就可以听到语音阅读了。
原创粉丝点击