用VBA 或者Matlab 进行数据筛选。

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

大家好，

小弟在写一篇论文，用到了高频数据。但是小弟对excel 不是很熟悉，要用到数据筛选的地方不是很明白。
例如下图，我要筛选出每一分钟最后一个出价（best ask）的值（要从数万计的数据中提取出来）。





请问有什么方法（VBA 或者Matlab）可以实现我的数据筛选？



先谢谢啦！

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：MATLAB matla atlab 数据筛选 Mat excel 高频 论文

Excel 用个 自带的if 的结构 应该可以弄出来。

Sub 提取数据()
    Dim sh1 As Worksheet, sh2 As Worksheet, i&
    Set sh1 = Worksheets("原始数据表")
    Set sh2 = Worksheets("提取数据表")
    With sh2
        .Columns("A:D").ClearContents
        sh1.Columns("A:D").Copy .[A1]
        .Columns("A:D").Sort Key1:=.Range("D2"), Header:=xlGuess, OrderCustom:=1
        For i = .[D65536].End(xlUp).Row To 2 Step -1
            If .Cells(i, 4).Value <= .[F1].Value Then .Rows(i + 1 & ":" & 65535).Delete: Exit For
        Next
        .Columns("A:D").Sort Key1:=.Range("B2"), Key2:=.Range("A2"), Header:=xlGuess, OrderCustom:=1
        For i = .[B65536].End(xlUp).Row - 1 To 2 Step -1
            If .Cells(i, 2).Value = .Cells(i + 1, 2).Value Then .Rows(i).Delete
        Next
        .Columns("A:D").Sort Key1:=.Range("A2"), Header:=xlGuess, OrderCustom:=1
        .Activate
    End With
    MsgBox "OK!"
End Sub