在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属性关闭自动筛选。
你可以根据自己的需求修改代码中的工作表、筛选范围、列和条件。
