欢迎访问抖客教程网!

抖客教程网

您现在的位置是:主页 > 办公课堂 > Excel教程 >

Excel教程

excel表格按文字如何排序

发布时间:2023-12-08 23:00:01Excel教程评论
1.excel表中在一个单位格中中奈何能把文字有序的分列 按什么排序?按声母顺序排序?给你个例子你看看吧 在事情表页面按ALT+F11 进入VBA编辑窗口,在左边的列表框先插入模块,粘贴以

1.excel表中在一个单位格中中奈何能把文字有序的分列

按什么排序?按声母顺序排序?给你个例子你看看吧

在事情表页面按ALT+F11 进入VBA编辑窗口,抖客教程网,在左边的列表框先插入模块,粘贴以下代码到光标位置,封锁VBA代码窗口.该代码是一个自界说函数,目标就是对指定单位格的内容按字符的ascii码的巨细举办排序(对汉字来说就是按声母的顺序举办排序).

用法跟excel内置函数基内情同 好比要排序A1单位格的内容就在A2 单位格输入=zfpx(A1)

代码如下:

Function zfpx(str As String)

ReDim arr(Len(str) - 1)

For i = 1 To Len(str)

arr(i - 1) = Mid(str, i, 1)

Next

For i = LBound(arr) To UBound(arr) - 1

For ii = i + 1 To UBound(arr)

If Asc(arr(i)) > Asc(arr(ii)) Then

temp = arr(ii)

arr(ii) = arr(i)

arr(i) = temp

End If

Next ii

Next i

zfpx = Replace(Join(arr), " ", "")

热心评论

评论列表