vba调用sort方法实现排序
sort方法引用格式如下：
Range("待排序数据区域").Sort(Key1, Order1, Key2, Type, Order2, Key3, Order3,Header, OrderCustom, MatchCase, Orientation, SortMethod,DataOption1, DataOption2, DataOption3)
其中 key1，key2,key3为排序的行列参数，可以设置3个关键区域参数来实现排序
order1,oeder2,order3为排序的方法，指定是升序还是降序，分别对应key1,key2,key3
A-Z升序= xlAscending 或直接=1
Z-A降序= xlDescending 或直接=2
带参数名引用时：
Order1:=xlAscending 或 Order1:= 1
Header参数设定是否有标题行参数，一共有3个值：
Header:= xlGuess=0 或xlYes=1 或 xlNo=2
即=xlGuess、或=0时，工作表自己判断
=xlYes、或=1时，强制第1行为列标题，即第1行【不参与排序】
=xlNo、或=2时，强制没有列标题。即第1行【也参与排序】
MatchCase 参数设定是否匹配大小写
MatchCase:=False 、或=0 不区分大小写
MatchCase:=True 、或=1 区分大小写
Orientation 参数设定排序方向
一般为同一列中从上到下各行进行排序：Orientation:= xlTopToBottom 、或=1
如果是 同一行中从左到右各列进行排序，则为：Orientation:= xlLeftToRight、或=2
SortMethod参数设定 排序的依据
按拼音排序： SortMethod:= xlPinYin 、或=1
按笔画排序： SortMethod:= xlStroke、或=2
DataOption参数设定按数值或按文本排序
DataOption1,DataOption2,DataOption3分别对应key1，key2，key3
DataOption1:= xlSortNormal 默认值或者xlsortTextAsNumbers将文本作为数字型数据排序
一个小小应用示例
Sub b()'对A1到A10的数据升序排列
Worksheets(1).Range("A1:A10").Sort Key1:=Worksheets("Sheet1").Cells(1, 1), order1:=xlAscending
End Sub
获取更多excel vba资料 请关注崋说
