原創:一個讓EXCEL開口說話並且同步彈出提示框的技巧


           

大家好,

在EXCEL中還有一項非常重要的功能,就是語音播報;可以實現用windows操作系統內置的TTS功能,將指定單元格或指定內容用語言播放出來; 該項功能,其實用處還是蠻大,舉幾個例子吧: 1、輔助數據錄入檢查,想沒想過一邊錄入數字,一遍聽錄入的內容,是不是可以有效提高錄入的准確性啊; 2、在定制開發的系統中,對於經常出錯或關鍵操作步驟,除了Msgbox的提示提醒外,在同步加上語音提醒,是不是很酷呢; 3、對於不願意看書的懶人,做一款閉上眼睛,也可以進行文檔閱讀的有聲讀物也不錯吧; 4、其他等等等,盡可能的發揮您的想象空間吧........ 在本教程中主要是使用TTS實現幫助俺發語音微信的功能,由於俺年紀太大,聲音太過滄桑,怕嚇到大家,所以。。。。。。

-----------------------------------------------

言歸正傳: 第一步: 在您新建的Excel工作簿的sheet1中參照下圖的樣式設計:

第二步: 在開始菜單、開發工具、VisualBasic、插入、模塊,復制粘貼一下代碼:

 

Sub LetExcelSpeak() 

TT = Sheet1.Range("C6") 

Application.Speech.Speak TT, True, False, True 

MsgBox TT

 End Sub 

 

 第三步: 將您設計好的程序主界面中的speak按鈕指定到宏:LetExcelSpeak()

第四步: 點擊speak按鈕,開始吧。。。。。。

如有疑問,可發微信,或加QQ聯系2118917071;

 


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM