Range("A1:G15").Sort Key1:=Columns("A"), order1:=xlAscending, Header:=xlYes 得到顺序为:曹操(cao)在第一位,诸葛亮(zhu)在最后一位。我们也可以使用SortMethod参数把中文排序方式改为按笔画数排列,如:Range("A1:G15").Sort Key1:=Columns("A"), order1:=xlAscending, Header:=xlYes, So...
SortMethodAs XlSortMethod, _ DataOption1As XlSortDataOption, _ DataOption2As XlSortDataOption, _ DataOption3As XlSortDataOption) 说明: 所有参数均可选。 参数Key1、Key2、Key3指定排序字段,确定要排序的值,但参数Key2、Key3不能用于排序数据透视表。...
l 参数Order1、Order2、Order3,分别确定参数Key1、Key2、Key3指定值的排序顺序,相应的常量值是xlDescending或者xlAscending(默认)。 l 参数Type,指定要排序的元素。仅用于数据透视表,可以指定为xlSortLabels或者xlSortValues。 l 参数Header,指定是否第一行包含标题信息,默认为xlNo。如果想要Excel尝试确定标题,那么指...
Range("A1:I19").Sort [G3], 1, , , , , ,0, 1, 0, 1, 1,1 或根据默认为:Range("A1:I19").Sort [G3], 1 Range("待排序数据区域").Sort(Key1, Order1, Key2, Type, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, ...
Range("A1:G15").Sort Key1:=Columns("A"), order1:=xlAscending, Header:=xlYes 得到顺序为: 曹操(cao)在第一位,诸葛亮(zhu)在最后一位。 我们也可以使用SortMethod参数把中文排序方式改为按笔画数排列,如: Range("A1:G15").Sort Key1:=Columns("A"), order1:=xlAscending, Header:=xlYes, Sort...
.Sort.SortFields.Clear '清空自定义排序的规则 '增加4个key值 .Sort.SortFields.Add Key:=.Range("K10"), SortOn:=xlSortOnValues, Order:=xlAscending .Sort.SortFields.Add Key:=.Range("d10"), SortOn:=xlSortOnValues, Order:=xlAscending .Sort.SortFields.Add Key:=.Range("e10"), SortOn:=xlSortOn...
rng.Sort Key1:="性别", Order1:=xlAscending, Header:=xlYes End Sub 运行代码后的结果如下图。进一步,添加第二个排序字段,代码如下:Sub testSort2()Dim rng As Range Set rng = Range("A1:G10")rng.Sort Key1:="性别", Order1:=xlAscending, Key2:="总分", Order2:=xlDescending,...
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _:=xlPinYin Range("B2").Select '第二次排序,按基准D1,A1,B1 来实现 Selection.Sort Key1:=Range("D1"), Order1:=xlAscending, Key2:=Range("A1") _, Order2:=xlAscending, Key3:=Range("B1"), Order3:=...
:=表示它左边的参数名称的值,通常VBA参数的书写是有先后顺序的,用了:=后参数就可以不按先后顺序书写了,方便编写的人。比如上述的例子也可以这样写 Range("a1:a10").Sort Order:=xlAscEnding ,Key1:=Range("a1")可以
Range("A1:C" & Myrows).Sort Key1:=Range("a1"), Order1:=xlAscending, Key2:=Range( _"b1"), Order2:=xlAscending, Key3:=Range("c1"), Order3:=xlDescending, _Header:=xlYes 第一排序是Range("a1"),是升序,第二排序条件是Range("b1"),也是升序,第三排序条件是Range("c1"),是降序,上述...