ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[求助] 创建一位数转换两位数的自定义函数

[复制链接]

TA的精华主题

TA的得分主题

发表于 2018-12-22 20:16 来自手机 | 显示全部楼层
WYS67 发表于 2018-12-22 19:26
老师:无法上传加载宏后的附件。而未加载宏的附件输入公式时一切都正常。怪就怪在早几个月前,就出现过类 ...

可以模拟几个数据保留代码,其余数据删除,再上传,或者参考27楼修改代码试试!

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-22 20:42 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
lss001 发表于 2018-12-22 20:16
可以模拟几个数据保留代码,其余数据删除,再上传,或者参考27楼修改代码试试!


一位数转换成3区余lsdongjh .zip (35.94 KB, 下载次数: 0)
里面有您和lsdongjh老师写的代码的计算结果。没有加载宏时,指定第二三参数为数字如果第二三参数为单元格调用则加载宏后也能显示正确结果】,输入公式三键确定,就会显示正确结果;但加载宏后,输入公式三键确定,就会显示#VALUE!错误!  奇怪的是关闭工作簿,重新打开后,即可显示正确结果,再次选定结果显示区域,输入公式三键确定,就会重新出现#VALUE!错误!

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-22 21:00 | 显示全部楼层
lss001 发表于 2018-12-22 20:16
可以模拟几个数据保留代码,其余数据删除,再上传,或者参考27楼修改代码试试!

老师:上传到http://club.excelhome.net/thread-1452949-1-1.html 的附件已通过审核。您可以在那里下载测试

TA的精华主题

TA的得分主题

发表于 2018-12-22 21:15 来自手机 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
WYS67 发表于 2018-12-22 21:00
老师:上传到http://club.excelhome.net/thread-1452949-1-1.html 的附件已通过审核。您可以在那里下载测 ...

Win10/excel2016版测试通过!
可考27楼更改试试!

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-22 21:26 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
lss001 发表于 2018-12-22 21:15
Win10/excel2016版测试通过!
可考27楼更改试试!

老师:我就是用27楼最新代码加载宏的啊!另外附件里 lsdongjh老师写的代码加载宏后出现的问题和您写的代码完全一样!

我觉得不是代码的问题。难道是office365 excel的VBA系统对QUYU四个单词敏感引发的?我换个名称再试试。

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-22 21:37 | 显示全部楼层
本帖最后由 WYS67 于 2018-12-22 21:44 编辑
lss001 发表于 2018-12-22 21:15
Win10/excel2016版测试通过!
可考27楼更改试试!

老师:经过测试,同样是27楼您写的最新代码,自定义函数取名QUYU【见下面左图的V列】,出现#VALUE!错误,而延用原名SHUZHEN【右图W列】显示正确结果!

20181222213307.png 20181222213347.png

真是奇了怪了!原先我也修改过许多自定义函数的名称,从未出现过此类错误啊!

TA的精华主题

TA的得分主题

发表于 2018-12-22 21:56 来自手机 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
WYS67 发表于 2018-12-22 21:37
老师:经过测试,同样是27楼您写的最新代码,自定义函数取名QUYU【见下面左图的V列】,出现#VALUE!错误, ...

只能猜测QUYU可能与excel内置名称冲突!

评分

1

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-22 22:08 | 显示全部楼层
lss001 发表于 2018-12-22 21:56
只能猜测QUYU可能与excel内置名称冲突!

又反复换了几个名字,比如QUYU1,都能显示正确结果!看来真是名称问题--不能使用QUYU作为名称! 20181222220717.png

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-23 19:19 | 显示全部楼层
本帖最后由 WYS67 于 2018-12-23 20:15 编辑
lss001 发表于 2018-12-22 20:16
可以模拟几个数据保留代码,其余数据删除,再上传,或者参考27楼修改代码试试!

总表的序号和期序是连贯的.png 分表的序号和期序断断续续不连贯.png

老师:上面左图是《总表》,可以看出,E列的序号是从5开始,逐行连续递增的;H列的期序虽然也是从H5的01开始逐行连续递增,但是以C3指定的每天84期的周期进行循环的,达到峰值84后,就会重新从01开始逐行连续递增。
总表 以间隔行数为周期的计数结果 .png 分表  以序号间隔7期为周期的计数结果.png

上面左图是《总表》以H2指定的间隔7行为周期时,M,O,P列各指定条件的计算结果;右图则是《分表》以H2指定的间隔序号个7为周期时,K,L列各指定条件的计算结果。

    恳请老师抽空,在保留原代码提取数据和按H2指定周期计数全部功能的基础上,把《总表》S列以间隔行数为计数周期代码,修改为《分表》里以H2指定的以间隔序号为计数周期的代码。

   同样以H2为指定条件,两个统计表的格式和统计内容也完全相同;就只是指定条件的对象不同,恳请老师修改代码,当点击《分表》按钮后,显示如《分表》中【 2 中位】里的计算结果。

      修改出现次数统计的条件参数.zip (1.58 MB, 下载次数: 2)

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-12-23 21:29 | 显示全部楼层
lss001 发表于 2018-12-22 20:16
可以模拟几个数据保留代码,其余数据删除,再上传,或者参考27楼修改代码试试!

恳请老师抽空修改一下http://club.excelhome.net/forum. ... 782&pid=9768943里的参数代码,使之表格按指定间隔序号提取和统计数据。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2025-1-15 20:58 , Processed in 0.027037 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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