在Excel VBA中小数点被忽略

Question

我有一个在excel上运行的宏，该宏将一个表中的数字复制到另一个表中

首先，我将所有相关数字存储在字符串数组va()然后在新工作表中分配数组值。

ActiveCell.Offset(0, 5).Value = va(i, 5)

当数字为-0,522004时，我在新工作表中获得正确的结果，但是当数字为-1,175378时，我得到-1175378,0000作为Excel工作表中的输出。

请注意，我使用“，”作为小数点分隔符，并使用“。”。 作为千位分隔符。

我还尝试将msgbox va(i,5)放到输出中，它显示-1,175378，但是当代码完成时，我得到了忽略的十进制值。

Answer 1

假设您的区域设置与字符串数据匹配（即逗号是小数点分隔符），则可以执行显式强制：

ActiveCell.Offset(0, 5).Value = CDbl(va(i, 5))