excelで同じ条件で各列の独立したフィルタを作成する方法は？

Question

私は、各列に対してフィルタを個別に適用する必要があるデータをExcelファイルに格納しますが、フィルタ条件は同じです。これを求める理由は、それぞれの列に異なる行番号の条件を満たすセルがあることです。表1には、3つの列a、b、およびcがあります。 私は値をそれぞれ独立した列をフィルタする

= 20結果は

Answer 1

下の表のように見えるように、このコード

Sub matchvalues() 
Dim i As Long, j As Long 
Sheets.Add.Name = "newSheet" 
j = InputBox("Enter the value to filter") 
Rows("1:1").Copy Sheets("newSheet").Cells(1, 1) 
For i = 1 To Cells(1, Columns.Count).End(xlToLeft).Column 
    If IsError(Application.Match(j, Columns(i), 0)) Then 
     Sheets("newSheet").Cells(2, i) = "" 
    Else 
     Sheets("newSheet").Cells(2, i) = j 
    End If 
Next i 
End Sub 

、このVBAコードを試してみてくださいその値を求めるプロンプトが表示されますフィルタリングする必要があります。それを新しいシートを作成し、存在する場合にはその値を出力する入力として与える必要があります。

これを数式だけで実行したい場合は、以下を試してみてください。検索する値がセルE1にある場合は、セルG2に次の数式を入力してドラッグします。

=IF(ISNUMBER(MATCH($E$1,A:A,0)),$E$1,"") 

あなたは、更新結果を確認するために、直接E1の値を変更することができます。お役に立てれば。