如何在Excel中格式化多行数字单元格?

给定一个具有多行(文本换行)的Excel单元格。

例如

5501.700 640.8690 1081.45600 41.100 

我想格式化所有的数字( 在这个单元格 )有2个小数位和千位分隔符。 我有什么select来完成这项任务?

我认为唯一的办法是用macros观的方式; 读取值,分割每一行,格式,连接。

ALT + F11,插入 – >模块并添加;

 Public Function FORMATLINES(cell As Range) As String Dim data() As String, i As Long data = Split(cell.Text, vbLf) For i = 0 To UBound(data) If IsNumeric(data(i)) Then data(i) = FormatNumber(data(i), 2, vbTrue, vbFalse, vbTrue) Next FORMATLINES = Join(data, vbLf) End Function 

对于

 =FORMATLINES(A1) 

给我;

 5,501.70 640.87 1,081.46 41.10