单元格内数值排序

昆明金鹰工艺品经营部二店

xlllw203：
你好！
感谢您回帖！如果可以，请做个自定义函数，那就最好了，不要SUB.

礁石是大海的疤

三键盘数组
=TEXTJOIN(",",1,TEXT(SMALL(--(0&TRIM(MID(SUBSTITUTE(A1,",",REPT(" ",99)),ROW($1:29)*99-98,99))),ROW($1:29)),"[>]0;"))

孤独烈酒

独一无二的你:
您好！
非常感谢！这就是我想要的结果。

從榮缅怼

仅供参ka 0
自定义函数只支持32位的OFFICE.rar (13.52 KB, 下载次数: 202)

2021-10-23 16:40 上传

点击文件名下载附件
自定义函数只支持32位的OFFICE.rar

美丽世界

Function s(rng, r) '书生答题专用
  ar = Split(rng, r)
  For i = 0 To UBound(ar)
  For j = 0 To UBound(ar) - 1
    If Val(ar(i)) < Val(ar(j)) Then
      a = ar(i): ar(i) = ar(j): ar(j) = a
    End If
  Next
  Next
  s = Join(ar, r)
End Function

亦新一玉

我走我流：
非常感谢您的帮忙!
您的意思是说这个自定义函数在64位的OFFICE中没有办法使用？

人勿玩人

小书生:
非常感谢！这个自定义函数真棒！

浩然书吧