vba - 使用 VBA 查询我的 excel 工作表

Question

是否可以使用 VBA 查询工作表？

我希望能够选择时间列中的所有值，即 (00:00) WHERE the day equals 例如：Saturday

我有任何方法可以做到这一点，教程将非常有帮助。

谢谢

Answer 1

您可以通过编程方式创建自动筛选器，然后选择匹配的值：

Dim ws As Worksheet: Set ws = ActiveSheet

With ws
    .AutoFilterMode = False
    .Range("1:1").AutoFilter
    .Range("1:1").AutoFilter field:=2, Criteria1:="=Saturday", Operator:=xlAnd
    With .AutoFilter.Range
        On Error Resume Next ' if none selected
        .Offset(1).Resize(.Rows.Count - 1).Columns(2).SpecialCells(xlCellTypeVisible).Select
        On Error GoTo 0
    End With
    .AutoFilterMode = False
End With