excel表格内两个及以上的数字怎么按升序或降序自动排列?

2024-12-25 14:22:21
推荐回答(2个)
回答1:

Function px(rng As Range)
    Dim i%, j%, num
    num = rng.Value
    For i = 0 To 9
        If InStr(1, num, i, 1) > 0 Then
            jie = jie & Application.WorksheetFunction.Rept(i, Len(num) - Len(Application.WorksheetFunction.Substitute(num, i, "")))
            Else
        End If
    Next
    px = jie
End Function

用自定义函数可以做到

回答2:

是一个格子里面2个数字要排序啊?这个不是简单实现的。。。标记一下,看看有没有人能回答。。。