下面这段excel排序代码，出现错误代码：1004.类range的sort方法无效。请问为什么？
答案:3 悬赏:40 手机版
解决时间 2021-01-24 11:56
- 提问者网友：放下
- 2021-01-23 23:31
下面这段excel排序代码，出现错误代码：1004.类range的sort方法无效。请问为什么？
最佳答案
- 五星知识达人网友：独行浪子会拥风
- 2021-01-24 00:57
试试把这二行：
Cells(2, 1).Resize(lr, lc).Sort Key1:=Cells(2, 1).Resize(lr), Order1:=xlAscending
Cells(2, 1).Resize(lr, lc).Sort Key2:=Cells(2, col).Resize(lr), Order1:=xlDescending
修改成：
Cells(2, 1).Resize(lr, lc).Sort Key1:=Cells(2, 1), Order1:=xlAscending
Cells(2, 1).Resize(lr, lc).Sort Key1:=Cells(2, col), Order1:=xlDescending
简化为：
Cells(2, 1).Resize(lr, lc).Sort Key1:=Cells(2, 1), Order1:=xlAscending, _
Key2:=Cells(2, col), Order2:=xlDescending
Cells(2, 1).Resize(lr, lc).Sort Key1:=Cells(2, 1).Resize(lr), Order1:=xlAscending
Cells(2, 1).Resize(lr, lc).Sort Key2:=Cells(2, col).Resize(lr), Order1:=xlDescending
修改成：
Cells(2, 1).Resize(lr, lc).Sort Key1:=Cells(2, 1), Order1:=xlAscending
Cells(2, 1).Resize(lr, lc).Sort Key1:=Cells(2, col), Order1:=xlDescending
简化为：
Cells(2, 1).Resize(lr, lc).Sort Key1:=Cells(2, 1), Order1:=xlAscending, _
Key2:=Cells(2, col), Order2:=xlDescending
全部回答
- 1楼网友：西风乍起
- 2021-01-24 02:00
筛选到的数据没拷贝出去引起的啊追问能帮我修改一下吗？
- 2楼网友：千夜
- 2021-01-24 01:40
宏代码帮调试修改
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯
| 正方形一边上任一点到这个正方形两条对角线的 |
| 阴历怎么看 ？ |