请教多列依次执行排序的句法

ykcbf1100

天地一相 发表于 2023-4-13 15:47
谢谢，明白了。你这种写法，能不能不要那获取行号，直接就是那个单元格是筛选键，执行怎样的操作。不太懂 ...

我个人感觉取行号可以更精确的确定范围边界。

天地一相

ykcbf1100 发表于 2023-4-13 15:51
我个人感觉取行号可以更精确的确定范围边界。

谢谢，汇报下测试对比结果，刚分别测试计算了两种不同的写法，你的就是快了。原来的33秒，现在26秒。

天地一相

ykcbf1100 发表于 2023-4-13 15:51
我个人感觉取行号可以更精确的确定范围边界。

谢谢，之前的回复还在审核，内容就是测试后判定你的写法快一些。还想你给多写一句，按颜色，黄色，如何写呢？

ykcbf1100

天地一相 发表于 2023-4-13 16:24
谢谢，之前的回复还在审核，内容就是测试后判定你的写法快一些。还想你给多写一句，按颜色，黄色，如何写 ...

按颜色排序，具体得根据附件来定吧。

天地一相

ykcbf1100 发表于 2023-4-13 16:27
按颜色排序，具体得根据附件来定吧。

谢谢，请看附件，B列黄色排到最上面，用你的写法

ykcbf1100

天地一相 发表于 2023-4-13 16:40
谢谢，请看附件，B列黄色排到最上面，用你的写法

就B列吗？还是整个范围

天地一相

ykcbf1100 发表于 2023-4-13 17:09
就B列吗？还是整个范围

谢谢，有筛选状态的列范围，执行B列的颜色筛选。你之前写的，发现一个问题，会把我筛选键的那一行排到下面去，糊涂了，不明白为什么会这样，会不会是我筛选键所在的那一行，不是每一个单元格都有内容，标题行空缺？我是这样猜想的，我执行出错，就是筛选列，如key，B4，就是空的。

ykcbf1100

B列按颜色排序

天地一相

fanyoulin 发表于 2023-4-13 15:25
10楼那个代码就是写一行里面的排序代码，最多3个关键字；
依次也同样简单，结构如下：
With Range(Cell ...

谢谢，我套写了一段，测试发现执行顺序似乎不是你说的这样。就是按代码先后顺序执行的，请看截图。

fanyoulin

天地一相 发表于 2023-4-13 21:32
谢谢，我套写了一段，测试发现执行顺序似乎不是你说的这样。就是按代码先后顺序执行的，请看截图。

看不到你截图，但理论上还是要倒叙排序的，或许是你使用了一个升序另一个是降序的原因，你可以先尝试都用升序或者都用降序来测一下效果。