当前位置:首页经验技巧Excel经验excel知识

excel表格工作表怎么排列

2025-07-25 15:36:51

1.如何排序excel工作簿

你好!

首先说明一下:一个excel文件成为一个工作簿,一个文件内会有一个或多个不同工作表(sheet1,sheet2。.)

相信你想排列的是工作表顺序吧

这个比较难的,请查看链接:

Excel EXCEL一个工作薄里几百个工作表排序-Excel基础应用-ExcelHome技术论坛 -

2.怎么用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学习。

3.如何让excel自动排序

excel自动排序方法有多种,下面介绍常用的三种排序方式。

方法一、Excel自定义排序 设定自己需求的排序方法;现在有一张表,有“日期”和“地点”,希望将“地点”按照方式如:北京、上海、天津、广州,这样来排序;(如下图)1、打开菜单栏的“工具”-->选项,然后在弹出的“选项”窗口中选择“自定义序列”,在右边的“输入序列”中依次输入北京、上海、天津、广州,每输入一个地点时,就回车一次,输入完成后点击“添加”按钮;2、回到Excel工作表,选中“地点”这一列;3、选中以后,单击“数据”-->排序-->选项,在“自定义排序次序”中找到刚才添加的“北京,上海,天津,广州”这种排序方式,然后确定;4、这时就已经完成了想要的排序效果了(如下图)。方法二、Excel姓名排序 将姓名按照 A、B、C、D、E 等方式依次排序,下面是准备好的一份姓名表演示操作(如下图);1、打开需要排序的姓名表后,单击菜单栏的“工具”中的“选项”按钮,在弹出的“选项”窗口中,选择“自定义序列”,然后在“自定义序列”中选择从 A - Z 排序方式,如图;2、选择排序方式以后,回到Excel工作表中,依次选中所有需要排序的单元格,然后单击菜单栏的“数据”-->排序-->选项,在弹出的“排序选项”中选择“字母排序”,然后确定,确定,如图;3、下面看看Excel排序好的姓名表吧!方法三、Excel日期排序方法 这里以星期来排序作演示,如下图,从“星期一”到“星期五”,只是顺序打乱了而已,下面就将这顺序排列好;1、首先选中需要排序的区域,然后选择菜单栏的“数据”中的“排序”-->选项,在“自定义排序次序”中找到“星期日 - 星期六”的排序方式,然后确定;2、此时,所有的星期都会按照依次从小到大的排序方式来排序。

注意:如果还有其他如按数字大小排序、季节排序等,都可以用这种方法来操作。

4.能否将EXCEL工作簿中的工作表按名称排序,怎样实现

可以用vba完成.

按住ALT依次按F11,I,M.

粘贴下面代码后按F5即可完成工作表排序.

Sub test()

Dim s As Worksheet

Dim n() As String

t = ThisWorkbook.Sheets.Count

ReDim n(1 To t)

For i = 1 To t

n(i) = Sheets(i).Name

Next

For i = 1 To t - 1

For j = i + 1 To t

If n(i) > n(j) Then '如果要降序将>;改为<

a = n(i)

n(i) = n(j)

n(j) = a

End If

Next

Next

For i = 1 To t

Sheets(n(i)).Move Sheets(i)

Next

End Sub


免责声明:本站信息来自网络收集及网友投稿,仅供参考,如果有错误请反馈给我们更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任,谢谢您的合作。
版权所有:五学知识网 Copyright © 2015-2026 www.z8000w.com. All Rights Reserved .