- 在线时间
- 1159 小时
- 经验
- 740
- 威望
- 0
- 性别
- 男
- 最后登录
- 2012-5-23
- 注册时间
- 2005-4-24
- 阅读权限
- 50
- UID
- 79550
- 积分
- 1619
- 帖子
- 631
- 精华
- 1
- 评选资格
- True
2446财富
32鲜花
6技术
- 积分排行
- 633
- 昵称
- 鲁骨头
- 帖子
- 631
- 精华
- 1
- 分享
- 0
|
发表于 2010-12-14 18:58:31
|显示全部楼层
原帖由 金城烟雨 于 2010-12-14 13:50 发表 
版主加精说明你做的东东很不错,我也喜欢,应该加精。但还是有问题,我按你办法做了,问题还是有,哈哈,烦你再看看,谢谢。
你贴了三张图,
第一张,我理解是,在你的机器上解压以后没有和mscomct2.bat文件名相同的文件,如果只是.bat缺少的话,没有问题,你的浏览器隐藏了文件扩展名。还有可能是你的杀毒软件分析这个文件有威胁自动隔离了,这个文件会把MSCOMCT2.OCX复制粘贴到系统目录里面,不知道是不是这个原因导致安全软件误报的。
第二张图,我已经更新了代码,使用.cells(8,16)替代原来的[P8]的做法,应该是更加符合语法规范,请重新下载2.0.2再试一试,附件已经在顶楼更新了。如果代码里面还有类似的问题,请再告诉我,因为我没有办法搞到B版的Excel2007,只有麻烦你辛苦一下了。
第三张图,我实在找不到解决的头绪,因为Date是VBA系统函数,功能是返回当天的日期,数据类型为日期型,我在前面加了Cstr就是为了将变量类型转变为字符串以便和控件Date_input.value字符串类型保持一致再赋值的,你贴图的代码页还有其他三处也有类似的代码,都是将今天的日期赋值给控件Date_input的(名字可能稍有不同)。原因可能是B版的不承认Date系统自带函数。EH找了一下,有个替代的解决办法,更新代码=号后面的变成:
Application.WorksheetFunction.Text(Now(), "yyyy-mm-dd")
这个代码和原来具有相同的作用,只不过改用Now()这个系统自带函数了,不要告诉我B版还是不支持哦~~
十分感谢,继续帮忙测试吧~~ 你的B版很有意思,我都有点怀疑我的Excel是不是加了人工智能了,兼容我的那么多错误呵~~ |
|