0

我在 excel 中有 3 行数字,我想从 VBA 中第 2 行的最小值到最大值从左到右排序。

我发现如何根据第一行来做到这一点:

Range(Rows(1),Rows(3)).Sort Key1:=Range(Rows(1),Rows(3)), Order1:=xlAscending, Orientation:=xlLeftToRight

这就是我所拥有的:
5,6,2,1
4,3,2,1
a,d,w,x

这就是我想要的:
1,2,6,5
1,2,3,4
x,w,d,a

任何想法我需要添加多少行代码才能使其工作?

4

1 回答 1

1

更改 Key1:=Range(Rows(1),Rows(3))Key1:=Rows(2)

尝试:

Range(Rows(1), Rows(3)).Sort Key1:=Rows(2), Order1:=xlAscending, Orientation:=xlLeftToRight

演示:

在此处输入图像描述

于 2019-08-22T04:29:12.020 回答