VBA欧美数字格式

我正在使用VBA从EXCEL发送数据到MySQL数据库,当我从不同的计算机运行代码时遇到问题。 不同的电脑有不同的分隔符(“。”或“,”)configuration,我有一些问题转换数字。

我需要转换数字

“100.000,232”格式为“100,000.232”格式

我一直在环顾四周,似乎无法使其与NumberFormat= SUBSTITUTE()函数的工作。

我现在的代码如下

value = Int(Cells(MyLine, MyColumn).value) & "." & CLng(Split(CStr(Cells(MyLine, MyColumn).value), separator)(1)) 

分隔符是哪里. 或者, 。 当我有“0,001”这个代码失败,因为它转换为“0.1”而不是“0.001”

你能帮我解决这个问题吗?

最好的问候,西蒙。

我find了解决这个问题的方法。 replace(Cells(Lines,cols).value,separator,“。”)其中'separator'是用户设置的手动configuration。 它可以是“,”或“。”