如何在Excel中格式化多行數字單元格？

Question

給定一個具有多行（文本換行）的Excel單元格。

E.g.

5501.700 
640.8690 
1081.45600 
41.100 

我想格式化所有數字（在這個單細胞）有2位小數和千個分隔符。我有什麼選擇來完成這項任務？

Answer 1

我認爲唯一的方法是用宏;讀取值，分割每一行，格式，連接。

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