从 SAP 到 Excel 的小数点分隔符问题：“1,056”与“1.056”因子 1000

问题描述

我在与 SAP 链接的 excel 中编写了一个 VBA 代码，它会在 Excel 表中下载表格 VBRP。

我有数字问题。例如，SAP 中的计费数量是 1.056，当宏运行并尝试将值粘贴到 excel 中时，我们得到的数字是 1,056，而不是一千零 56。

当我通过 VBA 加载表格并使用 Ctrl + V 在 Excel 中手动复制粘贴表格时，我有正确的数字 1.056 一千零 56 个项目。

我应该怎么做才能在我的 excel 中有正确的数字？

解决方法

您可以在插入到工作表之前删除这些点。列上设置的数字格式将独立于所用机器的区域设置而应用。像这样：

Sub testdecimalsep()
    Dim test
    test = Split("1.11,1.00001,5.333",",")

    For i = 0 To UBound(test)
        test(i) = CLng(Replace(test(i),".",""))
    Next i

    Sheet1.Range("A1:A3").Value2 = Application.Transpose(test)
End Sub

祝你好运，