[讨论]倘使有多重列排序怎么办呢?

romli · 发表于 2007-4-21 11:57

在排序的时候只有三个关键字选,如果我有四个五个甚至更多该怎么办呢?

(不是在排定的区域中再选进行二次排序,能不能一下搞定?

用VBA能不能解决这个问题?

laoyebin · 发表于 2007-4-21 12:09

VBA应该能完成吧

或者你换2007，呵呵，能支持好多个排序的

northwolves · 发表于 2007-4-21 13:55

循环

Sub Macro1()
Dim i As Integer
For i = 20 To 1 Step -1
[a:t].Sort [a1].Offset(, 1, i - 1)
Next
End Sub

以上代码可实现将A:T列按a-->t的顺序升序排序

romli · 发表于 2007-5-5 21:33

首先感谢回复

不过,狼版,我未试验成功呢?

显示错误450:错误的参数号和无效的属性赋值

oobird · 发表于 2007-5-5 21:48

这是假设你的数据是a列到t列，每一列都要排序，你应该视自己的稳况修改。

wangyuanfu · 发表于 2007-5-5 22:17

我也急需知道，上面代码我也没有看明白，请大师仔细讲讲

oobird · 发表于 2007-5-5 22:38

Sub Macro1()
Dim i As Integer
For i = 20 To 1 Step -1
[a:t].Sort [a1].Offset(, i - 1)
Next
End Sub
多了一个1

romli · 发表于 2007-5-6 08:07

谢谢oobird!

very thanks,虾米时候才能达到你的水准,梦想ing...

820211639 · 发表于 2012-3-9 14:06

{:soso_e100:}

		自动登录	找回密码
密码			免费注册

最新热点 /1