您的位置: 首页 > EXCEL技巧 > ExcelVBA >

VBA按字母表顺序对工作表进行排序

时间:2013-12-13 整理:docExcel.net

如果工作簿内有大量以字母开头的工作表,要将这些工作表按照字母表的顺序进行排序,可以用下面的VBA代码来实现。按Alt+F11,打开VBA编辑器,单击菜单“插入→模块”,在代码窗口中粘贴下列代码并执行。

Sub 按字母表排序工作表()
Dim i As Integer, j As Integer, n As Integer
On Error Resume Next
n = Sheets.Count
If n = 1 Then End
For i = 1 To n - 1
  For j = i + 1 To n
If UCase(Sheets(j).Name) < UCase(Sheets(i).Name) Then
   Sheets(j).Move Before:=Sheets(i)
End If
  Next j
Next i
End Sub

上述代码是按照字母表升序来对工作表进行排序的,如果要按降序排序,将代码中的小于号改为大于号即可。

成功在线约会的方法论 问题:成功在线约会的方法论
回答:...名字有好感,都会远离负面含义的名字。名字首字母位于字母前半部分要好于后半部分。最成功的个人资料页是将个人信息和理想约会对象的描述比例七三开。 个人简介没有夸大其词或使用过于华丽的词藻,笔调幽默但真诚...
Excel按顺序排列数字,字母,日期等 问题:Excel按顺序排列数字,字母,日期等
回答:...排列一下,可能是按日期顺序排列,也可能是按数字、或字母等方式排列。本篇教程Excel办公网会详细讲解这些排列的方法! Excel按日期顺序排列 首先,选中需要按顺序排列的区域,然后依次打开菜单栏“数据”-->排序-->在...
Word2003为表格中的从右向左文字指定排序选项 问题:Word2003为表格中的从右向左文字指定排序选项
回答:...略 he 对文本进行排序,请单击“忽略 He”。 在按字母顺序排序时,以 he 起始的文字将以跟在 he 后的字符的字母顺序进行排序。 -(仅对于阿拉伯语)若要忽略 alef 对文本进行排序,请单击“忽略 Alef Lam”。 在按字...
Excel2010没有我们想要的排序规则该怎么办 问题:Excel2010没有我们想要的排序规则该怎么办
回答:...按照Excel里面的学历排序,不是这样的结果,它是按照首字母顺序进行排序的,那么该怎么处理呢? ①如下图所示,要将人员按照学历顺序进行排序,我们都知道,本科>大专>高中>初中>小学,但是直接按照学历排序是...
灵活运用Excel函数快速录入26个英文字母 问题:灵活运用Excel函数快速录入26个英文字母
回答:...l软件是外国人开发的,居然不能自动按顺序填充26个英文字母!有没有办法快速输入这个序列呢? 有,我们用函数转换来实现26个英文字母的自动填充: 如果从A2开始向下输入“A、B、C……”,先在A2单元格中输入...
玩转Excel数据04:按笔划排序 问题:玩转Excel数据04:按笔划排序
回答:Excel对文本默认的排序方式是按字母顺序进行排列的,但如果你想要按笔划顺序进行排列,那就来对地方了!汪琪老师今天要讲的就是将Excel对文本的排序方式修改为按笔划顺序排列。顺道提醒一下童鞋们,文章结尾有本课的素...
相关推荐: