关注微信公众号:VBA168 每天更新Excel VBA经典代码,祝你工作和学习更轻松! 在如图1所示数据列表中,需要按总成绩从高到低进行排序,示例代码如下。 Sub SortDemo() Range("A1").Sort key1:="总成绩", order1:=xlDescending, _ Header:=xlYes End Sub 运行SortDemo过程,排序结果如图2所示。 ​ 图1 待排序数据列表 图2 按总成绩降序排序结果 Range对象的Sort方法对区域进行排序,其语法格式如下。 Sort(Key1, Order1, Key2, Type, O