vba怎样挑选出满足条件的数据

在VBA中，可使用AutoFilter方法来挑选出满足条件的数据。以下是一个示例代码，演示怎样使用AutoFilter方法挑选出某一列中值大于10的数据：

Sub FilterData()
    Dim ws As Worksheet
    Dim rng As Range
    
    '设置工作表对象
    Set ws = ThisWorkbook.Worksheets("Sheet1")
    
    '设置挑选范围，这里假定数据在A1:D10范围内
    Set rng = ws.Range("A1:D10")
    
    '开启自动挑选
    rng.AutoFilter
    
    '挑选指定列（假定挑选条件在第3列）
    rng.AutoFilter Field:=3, Criteria1:=">10"
    
    '关闭自动挑选
    rng.AutoFilterMode = False
End Sub

在上面的代码中，首先使用Set语句将工作表对象和挑选范围的Range对象设置好。然后使用AutoFilter方法开启自动挑选，并指定要挑选的列和条件。最后使用AutoFilterMode属性关闭自动挑选。

你可以根据自己的需求修改代码中的工作表、挑选范围、列和条件。