複数の条件に自動フィルター機能を使用する場合

Question

TとU列の空白行をフィルタリングするシートがあります。 特定のケースが考えられます。

欠落している行がほとんどなく、列Sに欠落していると表示されています。行方不明の場合はフィルタ条件と見なされたくありません。デフォルトでは空白です。

もう1つのケースは、列Tと列Uのいずれかの行が空白になっているため、フィルタリングする必要があることです。両方の列が空白の場合は、それらもフィルタリングする必要があります。

参考用に2枚の画像が添付されています。誰も私がそれをどうやってできるか教えてもらえますか？私はVBAの初心者ですが、どんなリードも参考になります。

Sub FC() 
Dim ws As Worksheet 

Set ws = Sheets("FC") 

With ws 
.Range("A5:T1000").autofilter Field:=20, Criteria1:="=", Operator:=xlFilterValues 
End With 
End Sub 

私はそれは私が複数の条件を含めることができますどのように列T. と連携し、上記のコードを試してみましたか？私のケースでは、列Sが欠落しているため、完全な行を考慮する必要はありません。私のTとUでは、空白も空白も空白のままです。そして、それらをフィルタリングする必要があります。

これは私のシートは初めにどのように見えるかです。

私は、列TおよびUの行のいずれかが空白に発見され、私は空白行と列TおよびSをフィルタリングしたい、というような方法で、コードを持っている をしたいと思います私はそれらをフィルタリングしたいと思います。

Answer 1

ここで、ヘルパー列を使用してカスタムフィルタリングを行う方法を説明します。このミッションのために列Zを考えましょう。

Sub FC() 
    With Sheets("FC").Range("Z5:Z100") 
    .EntireColumn.Hidden = True ' <-- optional, to hide the temp column 
    .Formula = "=AND(S5<>""Missing"",OR(ISBLANK(T5),ISBLANK(U5)))" 
    .AutoFilter 1, True 
    End With 
End Sub