如何在文本转换中保持数字的尾随零？

Question

好的，情况就是这样：

我有.xlsx格式的Excel文件。其中一个单元格包含值132,6，其格式为数字。这意味着Excel将数字显示为132,60。现在因为它代表了一个价格（132欧元和60美分），我希望保持这种格式132,60。

现在我需要将所有单元格转换为文本格式，以便在此问题中不重要。由于该值实际为132,6，因此在转换后，这是显示的文本值，而不是132,60。但我希望在将其转换为文本时保持尾随零。

是否有任何VBA实现？

Answer 1

此格式应该有效

=TEXT(A2;"#'##0.00")

编辑：在VBA中 下面的代码段会将选择中的数字转换为文本。

Sub aMacro()
  Dim SelRange As Range
  Set SelRange = Selection
  For Each c In SelRange.Cells
     c.Value = Format(c.Value, "###0.00")
  Next
End Sub