Excel vba int转换为双重失败

时间:2015-12-15 19:32:01

标签: excel vba excel-vba

我想将整数值除以double值,并显示double值结果。在下面的代码中,在列K中找到的单元格是整数,并且转换为整数失败。我该如何解决这个问题?

Dim i As Integer
Dim value As Double
For i = 9 To 75
  If Range("K" & i) > 0 Then
    value = CDbl(Range("K" & i).Value) / CDbl(Range("M3").Value):
    Range("E" & i).Value = value 
Else
    Range("E" & i).Value = Range("L" & i).Value
End If
Next i

1 个答案:

答案 0 :(得分:2)

虽然Op提到:

  

抱歉,通常使用/,但我写错了,当我在这里写的时候

这似乎是问题的原因见\ Operator

\替换为/