跳到主要內容

如何從Excel中的下拉列表選擇中篩選數據?

在Excel中,我們大多數人都可以使用“篩選器”功能來篩選數據。 但是,您是否曾經嘗試從下拉列表選擇中過濾數據? 例如,當我從下拉列表中選擇一項時,我希望其相應的行將被過濾掉,如下圖所示。 本文,我將討論如何通過使用一個或兩個工作表中的下拉列表來篩選數據。

使用助手公式從一個工作表中的下拉列表選擇中過濾數據

使用VBA代碼從兩個工作表中的下拉列表選擇中篩選數據


使用助手公式從一個工作表中的下拉列表選擇中過濾數據

要從下拉列表中過濾數據,您可以創建一些幫助器公式列,請按以下步驟進行操作:

1。 首先,插入下拉列表。 單擊要在其中插入下拉列表的單元格,然後單擊 數據 > 數據驗證 > 數據驗證,請參見屏幕截圖:

2。 在彈出 數據驗證 對話框中的 設定 標籤,選擇 名單 來自 下拉,然後單擊 按鈕以選擇要基於其創建下拉列表的數據列表,請參見屏幕截圖:

3。 然後點擊 OK 按鈕,將立即插入下拉列表,然後從下拉列表中選擇一項,然後輸入以下公式: =行($ A $ 2:A2) (A2 是列中包含下拉列表值的第一個單元格)進入單元格D2,然後將填充手柄向下拖動到這些單元格以應用此公式,請參見屏幕截圖:

4。 繼續輸入以下公式: = IF(A2 = $ H $ 2,D2,“”) 到單元格E2中,然後向下拖動填充手柄以填充此公式,請參見屏幕截圖:

備註:在上式中:A2 是列中包含下拉列表值的第一個單元格,H2 是放置下拉列表的單元格, D2 是第一個輔助列公式。

5。 然後鍵入以下公式: = IFERROR(SMALL($ E $ 2:$ E $ 17,D2),“”) 進入單元格F2,然後將填充手柄向下拖動到單元格以填充此公式,請參見屏幕截圖:

備註:在以上公式中: E2:E17 是第二個輔助公式單元格, D2 是第一助手公式列中的第一個單元格。

6。 插入幫助程序公式列之後,您應該將過濾後的結果輸出到另一個位置,請應用以下公式: =IFERROR(INDEX($A$2:$C$17,$F2,COLUMNS($J$2:J2)),"") 到單元格J2中,然後將填充手柄從J2拖動到L2,並且已經提取了基於下拉列表的第一條數據記錄,請參見屏幕截圖:

備註:在以上公式中: A2:C17 是您要過濾的原始數據, F2 是第三個幫助器公式列, J2 是要在其中輸出過濾結果的單元格。

7。 然後繼續將填充手柄向下拖動到單元格以顯示所有相應的過濾記錄,請參見屏幕截圖:

8。 從現在開始,當您從下拉列表中選擇一項時,基於此選擇的所有行將立即被過濾,請參見屏幕截圖:


使用VBA代碼從兩個工作表中的下拉列表選擇中篩選數據

如果在Sheet1中的下拉列表單元格和Sheet2中的過濾數據單元格,則從下拉列表中選擇一項時,另一工作表將被濾除。 您如何在Excel中完成這項工作?

以下VBA代碼可能會對您有所幫助,請這樣做:

1。 右鍵單擊包含下拉列表單元格的工作表選項卡,然後選擇 查看代碼 從上下文菜單中,在打開的 適用於應用程序的Microsoft Visual Basic 窗口,將以下代碼複製並粘貼到空白模塊中:

VBA代碼:從兩頁的下拉列表選擇中過濾數據:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    On Error Resume Next
    If Not Intersect(Range("A2"), Target) Is Nothing Then
        Application.EnableEvents = False
        If Range("A2").Value = "" Then
            Worksheets("Sheet2").ShowAllData
        Else
            Worksheets("Sheet2").Range("A2").AutoFilter 1, Range("A2").Value
        End If
        Application.EnableEvents = True
    End If
End Sub

備註:在上面的代碼中: A2 是包含下拉列表的單元格,並且 Sheet2 工作表包含要過濾的數據。 號碼 1 在腳本中: 自動篩選1 是您要基於其過濾的列號。 您可以根據需要更改它們。

2。 從現在開始,當您從Sheet1的下拉列表中選擇一項時,相應的數據將在Sheet2中被過濾掉,請參見屏幕截圖:

最佳辦公生產力工具

🤖 Kutools 人工智慧助手:基於以下內容徹底改變數據分析: 智慧執行   |  生成代碼  |  建立自訂公式  |  分析數據並產生圖表  |  呼叫 Kutools 函數...
熱門特色: 尋找、突出顯示或識別重複項   |  刪除空白行   |  合併列或儲存格而不遺失數據   |   沒有公式的回合 ...
超級查詢: 多條件VLookup    多值VLookup  |   跨多個工作表的 VLookup   |   模糊查詢 ....
高級下拉列表: 快速建立下拉列表   |  依賴下拉列表   |  多選下拉列表 ....
欄目經理: 新增特定數量的列  |  移動列  |  切換隱藏列的可見性狀態  |  比較範圍和列 ...
特色功能: 網格焦點   |  設計圖   |   大方程式酒吧    工作簿和工作表管理器   |  資源庫 (自動文字)   |  日期選擇器   |  合併工作表   |  加密/解密單元格    按清單發送電子郵件   |  超級濾鏡   |   特殊過濾器 (過濾粗體/斜體/刪除線...)...
前 15 個工具集12 文本 工具 (添加文本, 刪除字符,...)   |   50+ 圖表 類型 (甘特圖,...)   |   40+ 實用 公式 (根據生日計算年齡,...)   |   19 插入 工具 (插入二維碼, 從路徑插入圖片,...)   |   12 轉化 工具 (數字到單詞, 貨幣兌換,...)   |   7 合併與拆分 工具 (高級合併行, 分裂細胞,...)   |   ... 和更多

使用 Kutools for Excel 增強您的 Excel 技能,體驗前所未有的效率。 Kutools for Excel 提供了 300 多種進階功能來提高生產力並節省時間。  點擊此處獲取您最需要的功能...

產品描述


Office選項卡為Office帶來了選項卡式界面,使您的工作更加輕鬆

  • 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,發布者,Access,Visio和Project。
  • 在同一窗口的新選項卡中而不是在新窗口中打開並創建多個文檔。
  • 將您的工作效率提高 50%,每天為您減少數百次鼠標點擊!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
For me, the Formula =ROWS($A$2:A2) didn't workend! It always gave me "2" back. I had to put =ROWS($A2:A2), so without the second "$", in order to reproduce your result.
This comment was minimized by the moderator on the site
How do I add multiple drown down menus? For example,
If i wanted a drop down menu for Product and name?.
This comment was minimized by the moderator on the site
Hey Kev, wondering if you found an answer to your question here? I have been looking for a bit to no avail.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations