VAULE2正在从货币中删除前导零

时间:2015-10-26 19:39:45

标签: string vba currency

我正在阅读带有货币值的文件,并创建要打印到文本文件中的数据字符串。我发现我需要使用VALUE2选项来阻止宏舍入值。但是,我现在遇到的问题是,如果任何尾随数字为零,则会丢弃它们。我需要宏来保留所有数字。

例如,如果单元格的格式为10.50美元,则下面的代码将10.5读入payAmountTemp,但我需要10.50。

payAmountTemp = Cells(j, 5).Value2

正确捕获数据的最佳方法是什么?仅供参考,我必须进一步格式化7位字段的文本文件数据,不带小数和前导零,所以我使用下面的代码。

payAmount = String(7 - Len(Replace(payAmountTemp, ".", "")), "0") & Replace(payAmountTemp, ".", "")

在上面的例子中,我得到了0000105,我需要0001050。

1 个答案:

答案 0 :(得分:0)

第二个小数:

Format(payAmountTemp, "#0.00")

为七个地方

Format(payAmountTemp * 100, "0000000;-000000")