Question

我正在寻找一种有效的方法从Excel电子表格中提取具有特定条件的期权价格数据：只有交易量（在其他列中）大于零的价格（在单独的列中）应该提取到另一个工作表。每个电子表格有超过5000个期权合约，那么通过VBA代码实现这一目标的有效方法是什么？ So for example regarding this snapshot, I would only need values in cells D18, G18 and P18 because corresponding values in E18,H18 and Q18>0

Answer 1

我无法查看哪个是交易金额，哪个是价格，但是如果值> 0，则表示您要将数据从一个工作表复制到另一个工作表。修改下面的脚本以满足您的需求。它应该非常接近你想要的。

Sub TryMe()

    Dim i As Range
    For Each i In Range("A1:A1000")
        If i.Value > 0 Then
            i.Select
            ActiveCell.Rows("1:1").EntireRow.Select
            Selection.Copy
            Sheets("Sheet2").Range("A65000").End(xlUp).Offset(1, 0).PasteSpecial
        End If
    Next i

End Sub

从Excel中提取特定期权价格数据

1 个答案: