excel表格中怎么以姓名排序

1.怎么用Excel以姓名给工作表排序?

给你一段excel home里面的代码，你自己研究一下吧。

Sub 工作表标签排序（）

Dim i As Long, j As Long, nums As Long, msg As Long

msg = MsgBox（"工作表按升序排列请选 '是[Y]'. " & vbCrLf & vbCrLf & "工作表按降序排列请选 '否[N]'", vbYesNoCancel， "工作表排序"）

If msg = vbCancel Then Exit Sub

nums = Sheets.Count

If msg = vbYes Then 'Sort ascending

For i = 1 To nums

For j = i To nums

If UCase(Sheets(j).Name) < UCase(Sheets(i).Name) Then

Sheets(j).Move Before:=Sheets(i)

End If

Next j

Next i

Else 'Sort descending

For i = 1 To nums

For j = i To nums

If UCase(Sheets(j).Name) > UCase(Sheets(i).Name) Then

Sheets(j).Move Before:=Sheets(i)

End If

Next j

Next i

End If

End Sub

Sub 工作表标签排序（）

Dim arr, Temp As String

Dim i As Integer, j As Integer, iSht As Integer

Dim sht As Worksheet

iSht = ThisWorkbook.Sheets.Count

i = 1

ReDim arr(1 To iSht) As String

'将工作表名导入数组

For Each sht In ThisWorkbook.Sheets

arr(i) = CStr(sht.Name)

i = i + 1

Next

'冒泡排序法

For i = 1 To iSht - 1

For j = i + 1 To iSht

If arr(i) > arr(j) Then

Temp = arr(j)

arr(j) = arr(i)

arr(i) = Temp

End If

Next j

Next i

'工作表按名称排序

Sheets(arr(1)).Move before:=Sheets(1)

For i = 2 To iSht

Sheets(arr(i)).Move after:=Sheets(arr(i - 1))

Next i

End Sub欢迎到excel home学习。

2.excel中怎么按姓名排序?

想要把excel表格中相同的名称排列在一起，可以按照以下步骤进行操作：

1、如下表中想要把姓名一栏当中相同的人名信息排在一起。

2、选中姓名这一列的数据，选中的标志就是表格的粗黑线，之后，依次在“开始”选项卡上选择【排序】。

3、点击【自定义排序】。

4、在“主要关键字”一栏选择“列A”，点击确认即可。

5、如图，得到相同名称的排列。

【加入社群一起学习】

想要了解更多关于excel的相关信息，推荐咨询秒可职场。秒可职场以产研与课研为核心竞争力，综合运用人工智能、大数据、云计算等新技术，创新研发“名师直播+AI指导+学员实操+助教答疑”的教学模式，并基于游戏心流理念、联合行业专家顾问共同打磨课程内容，为学员创造沉浸式的学习体验与专业系统的知识体系，帮助学员真正掌握职场硬技能。

3.Excel 2003中按姓名排序怎么做

一、使用excel的排序功能即可实现；

二、过程：选中需要排序的区域→点击上方工具栏点击 “数据”→“排序”→勾选“数据包含标题H”→主要关键字选择“姓名”（注意选择升序、降序）→确认。

三、2003版excel图解：

1、

2、

3、

四、补充：表格还可以使用多重条件排序，使用的时候点击“添加条件”，在次要关键字后面选择所需的信息即可。