比如要排序A1:B5
则VBA为:
Range("A1:B5").Sort Key1:=Range("B1"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
SortMethod:=xlPinYin, DataOption1:=xlSortNormal
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024