| 楼主 gvntw |
Q：如何在 Excel 中使计算机开口说话？ A：假如要使计算机说出“你好!欢迎光临ET社区”，代码如下：
|
| 2楼 ghmyy |
麻烦将哈哪个代码我要在那里设置哦 |
| 3楼 gvntw |
在VBE编辑器（alt+F1）里，具体地方得看你在放在哪个事件中运行了。 按Alt+F11，再按Ctrl+G，在立即窗口中输入Application.Speech.Speak "你好!欢迎光临ET社区", True，然后按回车听听。 |
| 4楼 ghmyy |
哦，谢谢，我试了试。怎么好像就念了个ET呢 |
| 5楼 apolloh |
要在控制面板设置一下，才能朗读中文，请参考： |
| 6楼 ghmyy |
不好意思再问哈，选择语音类型的时候我的机子着呢只有microsoft sam呢 |
| 7楼 apolloh |
WINDOWS是英文版还是中文版的？ |
| 8楼 ghmyy |
啊，在那里看是英文版还是中文版哦，英文版和中文版我分别怎么办呢 |
| 9楼 apolloh |
中文版应该有这个选项，英文版你装一下这个：http://www.exceltip.net/thread-135-1-2.html |
| 10楼 ghmyy |
谢谢版主，总算会了。还想问个问题：有没有什么办法我打开excel表就语音播报那段话呢 |
| 11楼 gvntw |
插入—模块： Sub Auto_Open() Application.Speech.Speak "你好!欢迎光临ET社区", True End Sub |
| 12楼 ghmyy |
谢谢！最后问哈如果我想在打开表格的同时那行字也显示出来，怎么弄呢。声音可以转化成其他更加动听的可以不呢。我还想插入哪个模块后打开所有表格都可以看到和听到哪个语音怎么弄呢。 |
| 13楼 罗刚君 |
Q：打开工作簿可以自动语音报告今天的日期和星期几吗？ A：利用VBA的Speech是可以完成的，代码如下：
|
| 14楼 zldccmx |
提示：1楼的代码应该放在标准模块中 如果放在ThisWorkBook的代码区，则这样也可以 PrivateSub Workbook_Open() Application.Speech.Speak "今天是" & Format(Now, "yyyy年m月d日 AAAA") End Sub |
| 15楼 amulee |
EXCEL里面本来就有命令吧，不过只能读英文
|
| 16楼 wise |
Q:如何利用VBA将朗读选区的字符朗读出来？ A：ALT+F11→插入模块→在模块中输入以下代码:
注意：运行该代码需要确保电脑有声卡并且连接音箱，并且所安装的office必须是完整版的，否则不具备朗读功能。 |
| 17楼 paul001 |
试了一下 蛮有意思 |