Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/28.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
我编写了一个VBA代码来输入数据,但它没有';不适用于小数_Vba_Excel_Finance - Fatal编程技术网

我编写了一个VBA代码来输入数据,但它没有';不适用于小数

我编写了一个VBA代码来输入数据,但它没有';不适用于小数,vba,excel,finance,Vba,Excel,Finance,这就是代码,它只适用于整数 Dim CoupRate As Double Do CoupRate = InputBox("enter coupon rate in percent without % sign. It must be between 0.00% and 25.00%") If CoupRate < 0 Or CoupRate > 25 Then MsgBox ("CoupRate must be betw

这就是代码,它只适用于整数

Dim CoupRate As Double
    Do
        CoupRate = InputBox("enter coupon rate in percent without % sign. It must be between 0.00% and 25.00%")
        If CoupRate < 0 Or CoupRate > 25 Then
            MsgBox ("CoupRate must be between 0% and 25%")
        Else
            Exit Do
        End If
    Loop
Dim耦合率为双精度
做
CoupRate=InputBox(“以百分比形式输入息票率,不带%符号。息票率必须介于0.00%和25.00%之间”)
如果耦合率<0或耦合率>25,则
MsgBox(“耦合率必须介于0%和25%之间”)
其他的
退出Do
如果结束
环

请使用逗号
而不是点
我也能得到输出中的小数。你能说得更具体一点吗

    CoupRate = InputBox("enter coupon rate in percent without % sign. It must be between 0.00% and 25.00%")
    If CoupRate < 0 Or CoupRate > 25 Then
        MsgBox ("CoupRate must be between 0% and 25%")
    Else
        'Exit Do
        MsgBox CoupRate & "%"
    End If
CoupRate=InputBox(“以百分比形式输入息票率,不带%符号。息票率必须介于0.00%和25.00%之间”)
如果耦合率<0或耦合率>25,则
MsgBox(“耦合率必须介于0%和25%之间”)
其他的
“退出吗
MsgBox耦合率&“%”
如果结束

它应该做什么?预期的行为是什么?这与您观察到的行为有何不同?请使用逗号而不是dot@QHarr我需要这个代码为票面利率=5.25工作,但它只适用于票面利率=5@DmitrijHolkin谢谢感谢您的考虑)实际上它对我不起作用,因为我使用的是点而不是昏迷)您能试试这种
格式(CoupRate,“0.00”)