excel怎么排序？

产品型号：ASUS U4700I

系统版本：Windows 10

软件版本：Microsoft Office Excel 2019

1.用电脑里的Excel软件，打开表格文件。

2.选择要排序的内容，点击上方数据。

3.打开排序功能，选择以当前选定区域排序。

4.点击排序，选择确定即可。

以下代码是excelVBA中的代码，

Sub autoNumber()

    Dim max_row As Long

    Dim i  As Long

    Dim cur_number As Long

    Dim content As String

    Dim d As Object

    Set d = CreateObject("scripting.dictionary")

    cur_number = 1

    '获得A列非空最大行号

    max_row = Range("A65535").End(3).Row

    For i = 2 To max_row

        If d.Exists(Cells(i, "A").Value) Then

            '从字典中取出编号

            Sheets("Sheet3").Cells(i, "B") = d.Item(Cells(i, "A").Value)

        Else

            '新添加编号

            Sheets("Sheet3").Cells(i, "B").Value = cur_number

            content = Sheets("Sheet3").Cells(i, "A").Value

            '将新编号存到字典中

            d.Add content, cur_number

            '编号+1

            cur_number = cur_number + 1

        End If

    Next

End Sub

假设商品从a2开始（第一行为标题）b2=IF(A2="","",IF(MATCH(A2,A:A,0)=ROW(),MAX(B$1:B1)+1,INDEX(B$1:B1,MATCH(A2,A:A,0))))下拉即可

你要的公式：

=IF(COUNTIF($B$1:$B2,B2)=1,MAX($A$1:$A1)+1,LOOKUP(1,0/($B$1:$B1=B2),$A$1:$A1))

向下填充就好。

提问最好是上个示例图，不然没办法给你准确的公式，自行对照图示更改对应区域即可。

=SORT(UNIQUE(A2:A8))

输入上公式后，回车即可。

本文如未解决您的问题请添加抖音号：51dongshi（抖音搜索懂视），直接咨询即可。