gpt4 book ai didi

vba - 如何解决 vba 中的运行时错误 6?

转载 作者:行者123 更新时间:2023-12-04 21:15:54 25 4
gpt4 key购买 nike

我有以下代码

TextBox50.Value = Round((CDbl(TextBox3.Value) / (CDbl(Worksheets("calculation").Range("O4").Value)) - 1) * 100, 1) & "%"
TextBox3 = Value 的值出现在 Worksheets("calculation").Range("O4") .

问题是如果 Range(O4) 的值为零,那么它本质上意味着 0/0,这就是为什么我得到运行时 6,溢出错误。

无论如何我可以用 0 替换 0/0。

任何帮助深表感谢。谢谢

最佳答案

您可以使用 IIF():

TextBox50.Value = Round((CDbl(TextBox3.Value) / IIF(CDbl(Worksheets("calculation").Range("O4")=0,1,CDbl(Worksheets("calculation").Range("O4")))

如果另一个是 0,它将返回 TextBox3 中的值。

关于vba - 如何解决 vba 中的运行时错误 6?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/38231638/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com