为了查询符合条件的数据,你可以使用 VBA 中的 Filter 函数。 例如,下面的代码将在名为 "Data" 的工作表中查询所有在列 "A" 中包含 "apple" 的行:
Dim rngAs Range
Set rng = Worksheets("Data").Range("A1:C10000")
rng.AutoFilter Field:=1, Criteria1:="apple"
为了查询符合条件的数据,你可以使用 VBA 中的 Filter 函数。 例如,下面的代码将在名为 "Data" 的工作表中查询所有在列 "A" 中包含 "apple" 的行:
Dim rngAs Range
Set rng = Worksheets("Data").Range("A1:C10000")
rng.AutoFilter Field:=1, Criteria1:="apple"