ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: baomaboy

[原创] 语音提醒

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2011-9-15 18:33 | 显示全部楼层
baomaboy 发表于 2011-9-15 16:34
如果12楼能说出是工作簿打开就提示找不到dll文件,还是点击朗读发音后才提示找不到dll的,能让我更快找到 ...

我用操作系统是WIN7。是点击朗读发音后才提示找不到dll的。

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-15 18:36 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
laosanjie 发表于 2011-9-15 18:33
我用操作系统是WIN7。是点击朗读发音后才提示找不到dll的。

新附件可以吗?如果还不可以可能是没有管理员的权限,无法复制文件到系统目录,你可以改绝对路径试试,如:
  1. Public Declare Function YYTX Lib "D:\test\LLKJ.DLL" (Optional YYInput As Variant) As Boolean
复制代码

TA的精华主题

TA的得分主题

发表于 2011-9-15 19:33 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 laosanjie 于 2011-9-15 19:44 编辑
baomaboy 发表于 2011-9-15 18:36
新附件可以吗?如果还不可以可能是没有管理员的权限,无法复制文件到系统目录,你可以改绝对路径试试,如 ...

改成下面的路径就可以了。发声是一个字母一个字母念的,但中文可以正确念出来{:soso_e189:}
Public Declare Function YYTX Lib "C:\语音提醒\LLKJ.DLL" (Optional YYInput As Variant) As Boolean
谢谢楼主不厌其烦的回复!

TA的精华主题

TA的得分主题

发表于 2011-9-15 19:50 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
win7系统下,无法运行!

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-15 19:55 | 显示全部楼层
2084030148 发表于 2011-9-15 19:50
win7系统下,无法运行!

win7无法运行是因为你可能没管理员权限,你仿照23楼的做就可以了。

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-15 19:58 | 显示全部楼层
laosanjie 发表于 2011-9-15 19:33
改成下面的路径就可以了。发声是一个字母一个字母念的,但中文可以正确念出来
Public Decl ...

一个字母一个字母的念是因为我本就是给中文设计的,如果有中文引擎的话就默认中文所以就一个字母一个字母的念了,如果没中文反而会默认念英文。呵呵,来我要多加一个参数做开关,可以选择用中文还是英文。

TA的精华主题

TA的得分主题

发表于 2011-9-15 20:01 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-15 20:52 | 显示全部楼层
本帖最后由 baomaboy 于 2011-9-15 21:26 编辑

重新更新了一下(添加了中英文选择参数,所以以前下载都不能用了,请重新下载)
1.dir("LLKJ.DLL")用法错了(VB里这样直接写好像可以取当然目录,到了vba里就不行了),所以也许并不是win7权限不够原因,请重新测试。
2.加入了中英文开关参数。
3.附件还在1楼更新。

TA的精华主题

TA的得分主题

 楼主| 发表于 2011-9-15 20:53 | 显示全部楼层
风云际会6 发表于 2011-9-15 20:01
一样没有用,一运行就关掉工作薄,我用的是2010版

也许还是缺少文件的问题,2003会提示缺少文件,也许2010会直接退出,
更新了文件复制代码,重新试一下吧。

TA的精华主题

TA的得分主题

发表于 2011-9-15 21:05 | 显示全部楼层
太牛了!如何把这个用到普遍的表格中呢?
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-25 23:02 , Processed in 0.046323 second(s), 6 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表