好的,是这样的:

我有一个.xlsx格式的Excel文件。单元格之一包含值132,6,其格式为数字。这意味着Excel将数字显示为132,60。现在,因为它代表一个价格(132欧元和60美分),所以我想将其保留为132,60格式。



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

为此有任何VBA实现吗?

最佳答案

这种格式应该工作

=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

09-28 01:38