gpt4 book ai didi

vba - 在德国 Excel 中解析美国数字格式

转载 作者:行者123 更新时间:2023-12-02 09:56:02 29 4
gpt4 key购买 nike

我正在创建一个 Excel 文件,帮助人们自动处理数据。在这张表中,有一些数字需要解析(并转换为其他单位等。简单的计算)。

数字采用美国格式,这意味着它们看起来像:

0,000,000.00

在德国,数字显示如下:

0.000.000,00

在 VBA 中,我实际上不知道正在使用哪个本地化版本的 Excel(德语或英语)。

问题:是否有一种简单的方法可以将美国格式数字解析为数据类型 Double,而不管用户使用的 Excel 本地化如何?

最佳答案

一些注释。我没有更改区域设置来进行测试。

'http://msdn.microsoft.com/en-us/library/office/bb177675(v=office.12).aspx
Debug.Print Application.International(xlCountryCode) 'Excel locale
Debug.Print Application.International(xlCountrySetting) 'Windows locale
sDecimal = Application.International(xlDecimalSeparator)
sThousand = Application.International(xlThousandsSeparator)

sNumber = "1,000,000.00"

If sThousand <> "," Then
If sDecimal <> "." Then
sNumber = Replace(sNumber, ",", "")
sNumber = Replace(sNumber, ".", sDecimal)
End If
End If

Debug.Print sNumber

关于vba - 在德国 Excel 中解析美国数字格式,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/13286444/

29 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com