Wyślij zapytanie do arkusza Excela za pomocą VBA

Question

Czy możliwe jest zapytanie do arkusza roboczego za pomocą języka VBA?

Chcę móc wybrać wszystkie wartości w kolumnie czasu tj (00:00), gdzie dzień jest równa na przykład: Sobota

ja jakiś sposób, aby to zrobić, wykorzystując samouczek byłby naprawdę pomocny.

Dzięki

Answer 1

Można programmtically Załóż Autofiltr, a następnie wybrać wartości Dopasowanie:

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