Text 使用inputbox将此数字格式化为文本

我有一个输入框，用于收集金额，然后将其输入单元格：

Dim DEKPOSO As String
DEKPOSO = InputBox("enter the ammount?")

Sheets("ammounts").Range("E3").Value = DEKPOSO

当您将金额输入为450.23时，一切正常，单元格将注册为450,23

---

问题是我在希腊，当我在输入框中正常输入金额450.23时（当选择希腊语时）它在单元格中正确显示，但显示错误，数字格式为文本，部分无法计算。

您是否尝试过使用

CStr

或

CDbl

函数？我想我尝试过，但它返回的是整数，没有小数点，例如450，双精度修正了问题，但在输入时使用了点，例如450.23将其转换为不带逗号的整数，例如45023不带逗号不干净，但您是否尝试简单地使用replace（DEKPOSO，“.”，“，”）或相反的方法，根据您的区域设置强制使用点或逗号？