excel表格表顺序怎么展开

1.excel表格中工作表顺序排列方法

别人的方法，转告你：按下ALT+F11打开VBA编辑器，插入一个模块，将下列代码粘贴进去使用即可。

'以下为需要复制的代码：

Sub SheetSort()

'工作表按名称排序

Dim i As Long

Dim Sh As Worksheet

'关闭屏幕刷新以提高速度

Application.ScreenUpdating = False

'添加一张临时表提取所有表名并排序

ThisWorkbook.Worksheets.Add after:=Worksheets(Worksheets.Count)

Set Sh = ActiveSheet

For i = 1 To Worksheets.Count - 1

Sh.Cells(i, 1) = Worksheets(i).Name

Next

Sh.Columns(1).Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _

OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod:= _

xlPinYin, DataOption1:=xlSortNormal

'按名称排序后移动表

For i = 1 To Worksheets.Count - 1

Worksheets(Sh.Cells(i, 1).Text).Move after:=Worksheets(Worksheets.Count)

Next

'禁止提示删除临时表再恢复提示

Application.DisplayAlerts = False

Sh.Delete

Application.DisplayAlerts = True

'恢复屏幕刷新

Application.ScreenUpdating = True

End Sub