关于指定区域排序的问题

mangrove

附件中，根据A1:H8指定区域类的数据，点击按钮后，能按H1关键字排序，我用了下面的代码，但是在使用过程中，总计行也会跟着排序，请高手帮忙指出问题所在，

Sub px()
dim ss as range
set ss = range("A1:A8").CurrentRegiin
ss.sort Range("H1"),2,Header:=xlyes
end

ykcbf1100

排序。。。。

mangrove

感谢~~~~~~

mangrove

ykcbf1100 发表于 2023-10-18 14:00
排序。。。。

大神，请问，如果有两个指定区域需要排序，用你刚才的代码会报错，能否帮忙看下

ykcbf1100

mangrove 发表于 2023-10-18 15:10
大神，请问，如果有两个指定区域需要排序，用你刚才的代码会报错，能否帮忙看下

你二个指定区域还用同一个代码肯定会出错了，主要是范围不一样了。

多个区域排序比单个区域排序复杂得多。

mangrove

ykcbf1100 发表于 2023-10-18 15:26
你二个指定区域还用同一个代码肯定会出错了，主要是范围不一样了。

多个区域排序比单个区域排序复杂得 ...

学习了，谢谢~~~

mangrove

ykcbf1100 发表于 2023-10-18 15:26
你二个指定区域还用同一个代码肯定会出错了，主要是范围不一样了。

多个区域排序比单个区域排序复杂得 ...

你好，上次你帮忙写的代码，里面的一个表格按G列降序排列，但是在排序过程中，第4行和第15行始终无法正常排序，能否帮忙看下问题出在什么地方，谢谢！

ykcbf1100

mangrove 发表于 2024-1-16 17:10
你好，上次你帮忙写的代码，里面的一个表格按G列降序排列，但是在排序过程中，第4行和第15行始终无法正常 ...

原代码已不适用附件的情况了，所以，代码要另写。
代码已发在你另二个求助帖上了。