A列如果有一组数字应如何用EXCEL VB代码排列（升序、降序）
答案:2 悬赏:30 手机版
解决时间 2021-02-12 00:36
- 提问者网友：容嬷嬷拿针来
- 2021-02-11 15:40
A列如果有一组数字应如何用EXCEL VB代码排列（升序、降序）
最佳答案
- 五星知识达人网友：第四晚心情
- 2021-02-11 17:16
请参考如下代码：
Range("A1:A10").Select '选中需要排序的数据区域
'按A列升序排，有标题行
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortTextAsNumbers
'按A列降序排，无标题行
Selection.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
在宏编辑器中，点中代码中的 Selection.Sort 再按 F1，即可看到Excel VBA关于排序的完整详细的帮助说明与举例.
GoodLuck!
Range("A1:A10").Select '选中需要排序的数据区域
'按A列升序排，有标题行
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortTextAsNumbers
'按A列降序排，无标题行
Selection.Sort Key1:=Range("A1"), Order1:=xlDescending, Header:=xlNo, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _
:=xlPinYin, DataOption1:=xlSortNormal
在宏编辑器中，点中代码中的 Selection.Sort 再按 F1，即可看到Excel VBA关于排序的完整详细的帮助说明与举例.
GoodLuck!
全部回答
- 1楼网友：洎扰庸人
- 2021-02-11 17:22
搜一下：A列如果有一组数字应如何用EXCEL VB代码排列（升序、降序）
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯