运行出现了问题，关于在vba中single类型范围内数据，但是返回数值不正确？

Question

我写了这么一段程序public sub 小数问题()dim a as singlea=0.01range（“e7”）.value=aend sub手机上网伤不起啊 当a定义为single类型且为小数时在e7中显示不正确 定义为double类型时显示正确 请了解的朋友答疑解惑一下 手机输入 没有办法哈 这个应该是在single的范围内啊 直接看单元格无问题 但是点击单元格就可以看到数据有误差了 改为double类型就正常了可以具体解释下吗 在引用该单元格结果数值时是以误差数值计算的 单元格的设置是常规数值啊

Answer 1

'可能格式有问题，试一下：
Sub 小数问题()
Dim a As Single
a = 0.01
With Range("e7")
.NumberFormatLocal = "0.00E+00"
.Value = a
End With
End Sub
'感觉是你单元格的格式设置不正确，所以在写入之前先把目标单元格的格式设置了一下

Answer 2

应该是e7,显示小数位数不够的问题。