作者:iamlaosong
1、在对Excel处理时经常会对工作表中的数据排序,排序代码怎么写?通过录制宏可以很容易得到(我学习VBA的方法基本就是查资料、录制宏),例如2003版可以得到如下排序语句:
Rows("1:1500").Select
Selection.Sort key1:=Range("L2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
SortMethod:=xlPinYin, DataOption1:=xlSortNormal
代码是对L列进行排序,如果还有其它列,可以增加:
Rows("1:1500").Select
Selection.Sort key1:=Range("L1"), Order1:=xlAscending, _
key2:=Range("A1"), Order2:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
SortMethod:=xlPinYin, DataOption1:=xlSortNormal
排序语句实际就是Range对象的一个方法Sort,语句中参数变量排序关键字key1的值是Range("L1"),其中列号后面的行号似乎没什么用,所以Range("L2")、Range("L3")都没什么问题,也可以用列标题(相当于字段名),比