有小数点的运算

CNS1993 · 发表于 2020-2-28 23:01

有小数点的运算，通不过，请教。谢谢！

调拨.zip (1.17 MB, 下载次数: 6)

CNS1993 · 发表于 2020-2-29 12:37

顶一下，别沉了！

gbgbxgb · 发表于 2020-2-29 13:42

调试了下，发现任意一条数据的出品率均含有%这一符号，所以不存在你说的其它的都没问题，什么是“其它的”？

试试去除%这一符号，转为实际的数值型数据参与运算。

CNS1993 · 发表于 2020-2-29 14:46

gbgbxgb 发表于 2020-2-29 13:42
调试了下，发现任意一条数据的出品率均含有%这一符号，所以不存在你说的其它的都没问题，什么是“其它的” ...

是的，是%在作怪，但为什么是50%或88%就不出错，55.88%就出错。也就是百分数后面有小数就出错？不得解。

YZC51 · 发表于 2020-2-29 15:34

请参考
.Range("L" & CI).Value = TextBox2 / Replace(ListBox1.List(ListBox1.ListIndex, 9), "%", "") * 100 '数量

CNS1993 · 发表于 2020-2-29 15:44

YZC51 发表于 2020-2-29 15:34
请参考
.Range("L" & CI).Value = TextBox2 / Replace(ListBox1.List(ListBox1.ListIndex, 9), "%", "") * ...

谢谢！辛苦了！

YZC51 · 发表于 2020-2-29 15:47

CNS1993 发表于 2020-2-29 15:44
谢谢！辛苦了！

不客气！能用就好！
谢谢老师花花鼓励！

gbgbxgb · 发表于 2020-2-29 18:32

CNS1993 发表于 2020-2-29 15:44
谢谢！辛苦了！

你要注意，不是只简单地去除%这一符号，去除时，要让数值除以100！

gbgbxgb · 发表于 2020-2-29 18:34

YZC51 发表于 2020-2-29 15:34
请参考
.Range("L" & CI).Value = TextBox2 / Replace(ListBox1.List(ListBox1.ListIndex, 9), "%", "") * ...

你怎么不看那算式的含义，只是简单地帮助楼主替换掉%这一符号。

YZC51 · 发表于 2020-2-29 19:36

gbgbxgb 发表于 2020-2-29 18:34
你怎么不看那算式的含义，只是简单地帮助楼主替换掉%这一符号。

老师说的对，不过计算结果还算正确！

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

[求助] 有小数点的运算