根據條件打印行嗎？

Question

我對excel有點新，但到目前爲止我已經掌握了一些公式。我所做的是創建一個countifs公式來搜索列中的某些標準。但是，我想要做的是基於我使用countifs搜索的內容，我想要在單獨的工作表中顯示countifs搜索的行。例如，如果我通過A列搜索並發現列A中的3行中有單詞「Hello」，我想打印出列A中包含單詞「Hello」的行。有沒有簡單的或自動的方式來做到這一點？我不想通過過濾器手動執行此操作。如果任何人都能幫上忙，那會很棒！謝謝！

行和列的一個實例是這樣的：

Animal Owner Phrase 
Cat  Jack  Hello 
Dog  Jill  Bye 
Elephant Henry Hello 

在這種情況下我會使用COUNTIFS尋找「你好」，這將顯示在一個單獨的片的行。

Cat  Jack  Hello 
Elephant Henry Hello 

如果任何人有任何建議如何這樣做，那將不勝感激。謝謝！

Answer 1

爲什麼不在excel中使用內置過濾器，並只顯示符合特定條件的行（或者您的countif的列大於X或每列）然後打印？

「家」絲帶，面板上的「編輯，排序&篩選

Answer 2

OK，如果你想這樣做在VBA：

Sub SortByCondition() 

Application.ScreenUpdating = False 

Dim i As Integer, r As Integer 
Dim rFirst As Integer, rLast As Integer 
Dim wSin As Worksheet, wSout As Worksheet ' I like to have variables when working on multiple sheets for clarity and ease of use 

Set wSin = Sheets("Raw") ' The sheet where you have unsorted data 
Set wSout = Sheets("Sorted") ' The sheet where you will copy the sorted data 

' This is to find the first and last row in your table... there are many other ways to do it 
With wSin.Cells(1, 1).CurrentRegion ' Replace with first cell in your table 
    rFirst = .Rows.Row + 1 ' Assumes the first line of your table is the header 
    rLast = .Rows.Count + .Rows.Row - 1 
End With 

r = 2 ' We'll start copy on row 2 in the output sheet 

For i = rFirst To rLast Step 1 

    If wSin.Cells(i, 3).Value = "Hello" Then ' I'm assuming we test for 'Hello' being in column C 

     Range(wSin.Cells(i, 1), wSin.Cells(i, 3)).Copy wSout.Cells(r, 1) ' We'll copy in columns A to C in the output sheet 
     r = r + 1 

    End If 

Next i 


Application.ScreenUpdating = True 

End Sub