Excel中使用vba让程序说话的制作方法
发布时间：2022-06-14 23:00:33
excel中使用vba让程序说话的代码，如何在操作进行的呢?今天，小编就教大家在Excel中使用vba让程序说话的制作方法。
Excel中使用vba让程序说话的制作步骤如下：
首先我们打开一个工作样表作为例子。
使用alt+f11组合快捷键进入vbe编辑器，插入一个新的模块，并在模块中输入以下代码：
Sub myProcedure()
Application.Speech.Speak ("Hello" & Application.UserName)
End Sub
speech.speak命令需要安装texttospeech组件，如果没有安装过，excel会提示安装，现在系统中一般都会有安装，这里只是提一下，记住texttospeech组件可以直接在微软官方网站进行下载。
在这个代码里，tts语音组件只能朗读文本字符串，或者是值是文本字符串的变量。如括号内的字符串“hello”和username这个值为字符串的变量。
实际运行中，我们可以将该代码设为开启工作薄时自动播放，配合上定时功能，更能添加更多有趣的设置。比如将代码修改如下：
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:00:10"), "myprocedure"
End Sub
Sub myprocedure()
Application.Speech.Speak ("Hello" & Application.UserName)
End Sub
上面的代码是在打开工作薄后以当前时间十秒后运行播报程序，我们甚至可以在定时中进行循环，比如定时半个小时提醒一次工作时间，我们可以修改代码如下：
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:00:10"), "myprocedure"
End Sub
Sub myprocedure()
Application.Speech.Speak ("Hello" & Application.UserName)
Application.OnTime Now + TimeValue("00:30:00"), "myprocedure"
End Sub
Excel中使用vba让程序说话的制作
0
投稿猜你喜欢
在WPS文字中，调整页码字号的操作方法：1、在页脚处双击鼠标，进入页脚编辑状态；2、选中方框中的页脚数字；3、单击开始选项卡，在字号处选择所- Win11自带edge无法打开怎么办？很多朋友现在都开始使用Windows11系统自带的edge浏览器，因为挺不错的，跟谷歌浏览器一样可以拓
- 本文告诉大家如何在WORD中找回选择格式相似的文本在Word文档中我们常常会使用很多不同的文本格式，如果想要快速选定格式相同的文本，可以用鼠
- Win10 2004系统更新一般来说速度都不会很慢，但总有例外，有小伙伴在自己的系统更新安装win102004版本的过程中出现了win10版
- windows update无法启动错误126是在系统更新的时候发现的问题，很多用户弹出“错误代码126，找不到指定模块”。其实解决方法不是
- 我们在日常使用电脑的时候，有些情况下可能需要对我们的立体声混音进行相关的设置。那么有的小伙伴想要知道立体声混音是怎么么设置的。对于这中问题小
- 现在用笔记本的用户都越来越多了，现在也有人把笔记本当电视使了。又或者当游戏机来玩耍，我们都知道笔记本上面有一个触摸板，有的用户在操作电脑的时
- 有使用Win10系统的用户反映相机软件无法打开，提示0xa00f4244错误代码，那么如何解决这个问题？下面小编就给大家带来Win10相机打
- 表格多页打印时，如何加上标题和页码，从而方便查看呢？ 以上面的表格为例，在菜单栏中找到“页面布局”，然后点“打印标题”：将光标定位
- 抖音视频如何置顶展示？大家知道，新浪微博支持置顶，方便用户展示重要的信息内容。其实抖音视频也可以置顶展示。下面，小编就为大家介绍下抖音视频置
- 为了让自己的电脑显得更加个性化，很多用户都会自己手动更换电脑桌面壁纸。不过，最近有些朋友反馈，在Windows10系统中遇到桌面壁纸被锁定无
- DupeZap是一款MAC当中的文件查找的软件，查找MAC当中所存在的重复文件，可以自动标记可删除的项目，轻松清理重复文件，释放内存。那么，
- 对于wps表格的制作，要怎么在表格中插入饼状图呢?下面小编就为你介绍wps表格怎样插入饼状图的方法啦!wps表格插入饼状图的方法：首先打开你
- 在Excel中要对图形、文本框、艺术字、图片等对象进行排量操作，可以用下面的一些方法来快速选择它们： 一
- 出现“Word无法启动转换器mswrd632.wpc”这一问题，相信大家在使用Word的时候有出现这样的问题吧！最近一网友也出现这样的问题，
- Win10系统怎么显示隐藏文件夹？Win10系统如何查看那些被隐藏的文件夹呢？下面就给大家介绍Win10系统显示所有隐藏文件的方法。操作步骤
- 第一次使用苹果原装鼠标的用户可能会发现，苹果的Magic Mouse在使用时有点点“迟钝”，其实这是因为苹果原装鼠标跟踪速度默认设置得比较慢
- win10电池不充电怎么办？win10系统笔记本显示电源已连接，但没有充电是怎么回事呢？下文给大家带来win10电源已接通未充电解决方法，一
- 钉钉APP怎么退出前公司？钉钉APP是很多公司常用的一款办公应用软件，当我们申请离职后，许多用户不知道如何退出前公司的钉钉团队，其实操作起来
- Office中，PPT最简单，Word次之，Excel属最难，而Excel中就属函数最难掌握了，那么小编今天就来给你仔细的研究研究这个函数，
