创建一位数转换两位数的自定义函数

WYS67 · 发表于 2018-12-2 21:20

本帖最后由 WYS67 于 2018-12-2 21:22 编辑

lss001 发表于 2018-12-2 19:20
很少写网抓代码！

http://club.excelhome.net/forum. ... 1449108&pid=9743078 的mzbao老师已写了一个，只要按21楼描述的修改和完善一下代码就行，只等mzbao老师再上论坛时完成了。您可以看一下http://club.excelhome.net/forum. ... 108&pid=9743078的代码。
而http://club.excelhome.net/forum. ... 1449108&pid=9742750楼duquancai老师写的代码，由于必须得在python3.7环境下才能运行，无奈只能作罢。

感谢老师的回复！祝星期日快乐！

WYS67 · 发表于 2018-12-2 22:28

lss001 发表于 2018-12-2 19:20
很少写网抓代码！

老师：恳请看一下http://club.excelhome.net/thread-1449330-1-1.html里创建自定义函数MUZI的代码怎么写？

藕粉花卷 · 发表于 2018-12-3 09:07

进来学习下～

lss001 · 发表于 2018-12-3 14:18

本帖最后由 lss001 于 2018-12-3 16:43 编辑

→_→→_→

WYS67 · 发表于 2018-12-22 05:10

lsdongjh 发表于 2018-11-30 15:38

老师：您写的代码指定第二、三参数怎么只能为单元格调用，当为数字时，计算结果就会显示#VALUE!错误！

如：在B5:B50输入{ =QUYU(A5:A50,B2,B3)，可以显示正确结果；如果输入{ =QUYU(A5:A50,1,6)就会显示#VALUE!错误！普通公式也是如此。

恳请老师看看怎样修改代码，才能不出错？

WYS67 · 发表于 2018-12-22 05:23

yjh_27 发表于 2018-11-30 11:43
参见附件。

老师：C列是您写的代码的计算结果，与B列的模拟答案不符。验证其它列也是如此。麻烦您看看怎样修改代码，才能与B E H K各列的模拟答案一样？

创建一位数转换两位数的自定义函数.zip (17.7 KB, 下载次数: 4)

WYS67 · 发表于 2018-12-22 09:33

lsdongjh 发表于 2018-11-30 15:38

老师：恳请帮忙完善代码。

WYS67 · 发表于 2018-12-22 09:57

恳请老师们帮忙完善代码！

WYS67 · 发表于 2018-12-22 10:51

恳请老师们帮忙完善代码！

WYS67 · 发表于 2018-12-22 11:29

本帖最后由 WYS67 于 2018-12-22 11:31 编辑

lss001 发表于 2018-11-30 17:43
综合您以及楼上各位意见代码完善一下
把最小值与最大值位置互换！
当最小值大于1或小于0时将给出提示！

老师写的代码，计算结果正确，如果第二、三参数能够直接输入指定数字，再能够用普通公式转换单个数据就更好了！

		自动登录	找回密码
密码			免费注册

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