我想将整数值除以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