如何用SELECT语句选取各类前n大的数？

garging

有很多股票的数据，需要计算每只股票最近250天的方差，我的想法是先用select语句取出每个股票250个交易日的数据，然后用数据透视表算，但是select表不会写，请各位高手指点

由于数据量太大，附件只包含了4个股票，原文件有近2000个。。。试过用VBA写UNION语句，直接说查询语句太长，能不能直接写成一句？

另外请问excel07中怎么用SQL查询来建立数据透视表，我找了好久都找不到那个选项

先谢谢各位了

guojianlin1985

点左上角的下拉三角其他命令里边有。自己找

terqm

直接用数据透视表的组合应该可以了
或SQL...不知道你是不是这样的意思
select * from [sheet1$] where 日期 between #2009-7-1# and dateadd("d",250,"2009-7-1")

garging

原帖由 terqm 于 2010-11-26 07:52 发表
直接用数据透视表的组合应该可以了
或SQL...不知道你是不是这样的意思
select * from [sheet1$] where 日期 between #2009-7-1# and dateadd("d",250,"2009-7-1")

时间不连续,不能直接日期加250.我觉得应该需要用top 250...,但是不知道该怎么对应每类选250个

suwenkai

可以参考一下以下这个帖子（估计用SQL会比较慢）
http://club.excelhome.net/thread-430708-1-2.html

terqm

呵呵...理解错了楼主的意思....正如楼上所说..用纯SQL处理的确会很慢..........
我的思路是............先用VBA给表格添加个辅助列,这个辅助列是用来表示相应的代码(000001.SZ,0000002.SZ......)的序号ID(循环的1至 N),之后再用ADO+SQL通过序号ID就可以轻松达到楼主的需求(不过要先对数据进行排序,这个我就不写了)
Sub test()
    Dim dic As Object
    Dim I&, J&, T&, S$
    Dim arr(), xh&()
    Set dic = CreateObject("Scripting.Dictionary")
    I = Range("a65536").End(xlUp).Row - 1
    arr = Range("a2").Resize(I)
    ReDim xh(1 To I, 1 To 1)
    For J = 1 To I
        S = arr(J, 1)
        If Not dic.Exists(S) Then
            dic.Add S, 1
            xh(J, 1) = 1
            T = 1
        Else
            T = T + 1
            xh(J, 1) = T
        End If
    Next
Range("f1") = "序号ID"
Range("f2").Resize(I) = xh
End Sub

pc520

select * from [Sheet1$] t where 日期 in (select top 250 日期 from [Sheet1$] where 代码=t.代码 order by 日期 desc)
这种方法有点慢，其实可以直接在透视表选日期最近的250天，在数据区拖进一个日期字段，然后用行字段的日期对数据区的日期选最大250项，这样非常快