excel 工作薄里sheet(工作表)名称由大到小排序

想把工作表名称123456789按照987654321来排序,如何做到?

需要下载一个excel易用宝,安装后按下图操作,里面还有好多好用的功能噢!

温馨提示:答案为网友推荐,仅供参考
第1个回答  2015-04-22
Sub 工作表标签排序()
n = Sheets.Count
For i = 1 To n
Cells(i, Columns.Count).NumberFormatLocal = "@"
Cells(i, Columns.Count) = Sheets(i).Name
Next
Cells(1, Columns.Count).Resize(n).Sort Cells(1, Columns.Count)
R = Cells(1, Columns.Count).Resize(n)
Cells(1, Columns.Count).Resize(n) = ""
For i = 1 To n
Sheets(R(i, 1)).Move Sheets(1)
Next
End Sub
随便选一个工作表,右键,查看代码,然后在右边的代码窗口粘贴此代码,按F5键运行。本回答被网友采纳
第2个回答  2015-04-22
好像不好排,但手工可以一个一个的向前提,左键点住工作表标签,向前向后移动,然后排出来
相似回答