excel利用数组公式和自定义函数对单元格内的数字排序

假如Excel工作表的A1单元格中包含某个数字,如“987650056789”,要将各位数字按从小到大顺序排列,即得到“005566778899”,通常可以用数组公式或自定义函数:
【excel利用数组公式和自定义函数对单元格内的数字排序】如果单元格内的数字不超过15为,可使用下面的数组公式将数字按从小到大的顺序排列,在B1单元格中输入:
=TEXT(SUM(SMALL(–MID(A1,ROW(INDIRECT("1:"&LEN(A1))),1),ROW(INDIRECT("1:"&LEN(A1))))*10^(LEN(A1)-ROW(INDIRECT("1:"&LEN(A1))))),REPT("0",LEN(A1)))
注意需按Ctrl+Shift+Enter结束输入 。如果要将数字按从大到小的顺序排列,可将“SMALL”改为“LARGE”函数 。受数字精度的限制,如果单元格内的数字超过15位,可能得不到正确的结果 。而使用自定义函数则可用于较长的文本形式的数字 。
按Alt+F11,打开VBA编辑器,单击菜单“插入→模块”,在代码窗口粘贴下列代码:
Function SortNumsInCell(num As String, Optional order As Boolean) As String
Dim Str As String
For i = 0 To 9
For j = 1 To UBound(Split(num, i))
Str = IIf(order, i & Str, Str & i)
Next
Next
SortNumsInCell = Str
End Function
上述代码定义了一个自定义函数,它有两个参数,第一个为单元格内的数字或直接输入的数字,第二个参数为“0”或省略时指定按从小到大的顺序排列,为“1”时则相反 。关闭VBA编辑器,返回Excel界面,在B1中输入公式:
=sortnumsincell(A1)
即可得到按从小到大排列的数字 。如果输入:
=sortnumsincell(A1,1)
则返回从大到小顺序排列的数字 。

    推荐阅读