KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何在 Excel 中運用進階篩選,將資料複製到其他工作表?

作者Xiaoyang修改日期

在 Excel 中,進階篩選是依據條件提取與篩選資料的強大工具。此功能在同一工作表內運作流暢,但當您嘗試將篩選結果直接複製到其他工作表時,Excel 會彈出警告對話方塊。這對需要跨多個工作表管理資料(例如製作大型報表或儀表板)的使用者來說格外困擾。若能順利將篩選後的資料準確傳輸至其他工作表,不僅可讓資料呈現更清晰、簡化分享流程,還能維持整體資料的井然有序。

使用進階篩選將資料複製到 Excel 其他工作表時顯示警告訊息的螢幕截圖

使用進階篩選功能將資料複製到其他工作表

使用 VBA 程式碼將資料複製到其他工作表


使用進階篩選功能將資料複製到其他工作表

Excel 不允許您直接透過進階篩選,將篩選結果複製到與原始資料所在位置不同的工作表。不過,您可以運用一個實用的替代方法輕鬆突破此限制:在執行篩選前,先切換至目標工作表。以下步驟將協助您無需複雜設定或專用工具,即可順利完成此操作。此方法特別適合需要手動篩選並移動資料的使用者,適用於一次性或簡單清單的轉移需求。然而,若您需自動化執行頻繁的跨工作表篩選與複製作業,建議改用 VBA 程式碼(本指南稍後將詳細說明)。

1. 首先開啟您希望複製篩選結果的工作表。如此一來,當您套用進階篩選時,Excel 便會將篩選後的資料輸出至該工作表。請確保貼上位置沒有現有資料,以免遭到覆寫。

使用 Excel 進階篩選複製篩選結果時已啟用的工作表螢幕截圖

2. 啟動目標工作表後,前往 Excel 功能區,點選資料,再於排序與篩選群組中選擇進階,即可開啟「進階篩選」對話方塊,讓您精準微調篩選條件。操作前,請務必確認您已位於正確的工作表,因為篩選結果將直接顯示於此!

Excel 中「資料」索引標籤下「進階」選項的螢幕截圖

3. 在進階篩選對話方塊中:

  • 動作中選取複製到其他位置
  • 按一下範圍選取按鈕旁邊的清單範圍,即可選取您要篩選的資料集。此步驟中,您也能切換至來源工作表。
  • 點選範圍選取按鈕旁的條件範圍,即可設定篩選條件。條件可位於任何工作表上。

Excel 進階篩選對話方塊的螢幕截圖,其中已選取清單範圍與準則範圍

提示:清單範圍應包含標題,以確保條件正確比對。條件範圍也必須具備相符的標題,並包含篩選邏輯(例如數值、文字或公式)。為避免錯誤,請務必確認條件格式正確,且各範圍彼此不重疊。

4. 接下來,按一下範圍選取按鈕旁邊的複製到欄位,選取您在啟動的工作表中希望篩選結果開始顯示的儲存格,然後按一下確定。Excel 將自動把篩選後的資料從來源複製到您目前啟動的工作表!

使用 Excel 進階篩選將篩選結果複製到其他工作表的螢幕截圖

注意事項與疑難排解:

  • 若您的條件未找到任何相符項目,Excel 將僅將欄位標題複製至目標工作表。
  • 執行進階篩選前,務必先啟動目標工作表;否則,Excel 將顯示警告並阻止跨工作表複製。
  • 若列表放置區域與現有資料重疊,結果可能會在未另行提示的情況下遭到覆寫。
  • 處理大型資料集時,篩選與複製可能需要數秒鐘,請耐心等待 Excel 完成處理後再進行編輯。
  • 若出現錯誤訊息,請檢查您的清單範圍與條件範圍是否包含空白列、標題不符或儲存格合併等情形,這些都可能干擾篩選作業。

此手動方法最適合偶爾執行的簡單任務,一旦發生問題即可立即獲得回饋。對於更複雜的工作流程或重複性任務,則建議使用 VBA 自動化,不僅能節省時間,還可減少錯誤,如下所示。


使用 VBA 程式碼將資料複製到其他工作表

對於經常需要跨工作表篩選資料,或追求更高自動化程度的使用者來說,VBA(Visual Basic for Applications)提供了一種高效的方法,不僅能輕鬆在工作表之間傳輸篩選結果,還能突破標準介面的限制。此解決方案尤其適合用於重複性資料管理,或需維持一致篩選邏輯的報表情境。

1. 首先開啟包含您要篩選與複製資料的工作表,為程式碼執行與選取提示建立明確的上下文環境。

2. 在 Excel 中按下 ALT + F11,即可開啟 Microsoft Visual Basic for Applications 編輯器!

3. 在 VBA 編輯器視窗中,點選插入 > 模組 以新增模組,接著將下列程式碼複製並貼上至模組視窗:

VBA 程式碼:使用進階篩選將資料複製到其他工作表:

Sub Advancedfiltertoanothersheet()
'Updateby Extendoffice
    Dim xStr As String
    Dim xAddress As String
    Dim xRg As Range
    Dim xCRg As Range
    Dim xSRg As Range
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the filter range:", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xCRg = Application.InputBox("Please select the criteria range:", "Kutools for Excel", "", , , , , 8)
    If xCRg Is Nothing Then Exit Sub
    Set xSRg = Application.InputBox("Please select the output range:", "Kutools for Excel", "", , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    xRg.AdvancedFilter xlFilterCopy, xCRg, xSRg, False
    xSRg.Worksheet.Activate
    xSRg.Worksheet.Columns.AutoFit
End Sub

4. 插入程式碼後,按下 F5 鍵執行巨集,系統將提示您選取篩選範圍(即包含標題且欲篩選的資料)。選取所需範圍後,按一下確定

使用 VBA 複製篩選資料時,用於選取篩選範圍的提示方塊螢幕截圖

5. 下一個對話方塊將提示您選取條件範圍,此範圍應包含標題及篩選條件。選取條件儲存格後,請按一下確定

使用 VBA 複製篩選資料時,用於選取準則範圍的提示方塊螢幕截圖

6. 最後一個對話方塊將要求您選取目的工作表中的列表放置區域。如有需要,可切換至其他工作表,並選取希望篩選結果開始顯示的儲存格。選取完成後,按一下確定

使用 VBA 將篩選資料複製到其他工作表時,用於選取輸出範圍的提示方塊螢幕截圖

7. 篩選後的資料將自動複製到您指定的目的工作表位置,並自動調整該工作表的欄寬。除非您選擇的位置已包含現有內容(可能被覆寫),否則原始資料在兩個工作表中皆不會遺失。

  • 注意事項:
    • 請務必確保您的篩選範圍與條件範圍皆包含標題,且不含合併儲存格或空白列,以避免發生錯誤。
    • 請確認您的輸出目標儲存格位置有足夠空間容納篩選後的資料集,否則可能會覆蓋相鄰資料。
    • 若您經常需要重複此操作,可將巨集儲存並指定快速鍵,以加速存取。
    • 若遇到錯誤,或巨集未如預期執行,請確認已啟用巨集,並確保活頁簿已儲存為支援巨集的檔案格式(.xlsm)。

疑難排解與提示:

  • 若您選錯區域或未選擇任何區域,巨集將直接退出且不做任何變更—只需重新執行並選取正確的區域即可。
  • 處理大型資料集時,請務必等待程序完成後,再執行其他操作。
  • 您可以修改 VBA 程式碼,加入更進階的邏輯,例如移除重複項目或複製整行。

總結來說,兩種解決方案都能透過進階篩選將資料複製到其他工作表:手動方式最適合簡單或偶爾執行的任務,而 VBA 方法則推薦用於需要定期自動化處理資料的情境。選擇最適合的方法,取決於您的工作流程、技術熟練度,以及是否需頻繁重複執行這些操作。


最佳 Office 生產力工具

🤖KUTOOLS AI 助手:基於以下內容徹底革新數據分析:智慧執行     產生程式碼  建立自訂公式    分析資料並產生圖表  呼叫增強函數……
熱門功能尋找、醒目提示或標記重複值     刪除空白行     合併列或儲存格而不遺失資料     不使用公式的四捨五入……
高級 LOOKUP多重條件 VLookup    多重數值 VLookup     跨多個工作表 VLookup      模糊查找……
高級下拉列表快速建立下拉式清單     相依式下拉式清單     多選下拉式清單……
欄位管理員新增指定數量的欄位移動欄位切換隱藏欄位的可見狀態比較範圍與欄位……
精選功能網格聚焦     設計視圖   增強編輯欄    工作簿與工作表管理員     資源庫(自動文字)  日期提取     合併工作表    加密/解密儲存格    依清單傳送電子郵件     超級篩選      特殊篩選(篩選粗體儲存格/斜體/刪除線……) ......
頂尖 15 工具組12 文字工具添加文本刪除特定字符,……)   50+ 圖表 類型甘特圖,……)   40+ 實用公式基於生日計算年齡,……)   19 插入工具插入二維碼從路徑插入圖片,……)   12 轉換工具金額轉大寫匯率轉換,……)   7 合併和拆分工具高級合併行分割儲存格,……)……以及更多
在您的慣用語言中使用 Kutools—支援英文、西班牙文、德文、法文、中文及另外 40+ 種語言!

運用 Kutools for Excel 強化您的 Excel 技能,體驗前所未有的高效能!Kutools for Excel 提供超過 300 項進階功能,大幅提升生產力並節省寶貴時間。立即點擊,取得您最需要的功能……


Office Tab 為 Office 帶來分頁式介面,讓您的工作更輕鬆自在!

  • 在 Word、Excel、PowerPoint 中啟用分頁式編輯與閱讀功能,以及 Access、Visio 與 Project。
  • 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
  • 每天為您提升 50% 的工作效率,並省下數百次滑鼠點擊!

所有 Kutools 增益集,一個安裝程式

Kutools for Office 套件整合了 Excel、Word、Outlook 與 PowerPoint 的增益集,以及 Office Tab Pro,非常適合需要跨多個 Office 應用程式協作的團隊使用!

ExcelWordOutlookTabsPowerPoint
  • 全能套件— 包含 Excel、Word、Outlook 與 PowerPoint 增益集,以及 Office Tab Pro
  • 一個安裝程式,一個授權— 數分鐘內即可完成設定(支援 MSI)
  • 協同運作更出色— 在多個 Office 應用程式間實現流暢的生產力體驗
  • 30 天完整功能試用— 無需註冊,無需信用卡
  • 超值之選— 比單獨購買各增益集更省費用