如何將Excel中的過濾數據保存/導出到CSV文件？

在Excel中處理大型數據集時，通常會應用篩選器來專注於數據的特定子集。然而，有時候您可能希望將僅篩選後（可見）的行保存或導出到單獨的CSV文件中，以便進行報告、數據交換或進一步分析。默認情況下，當保存為CSV文件時，Excel的“另存為”功能將導出整個工作表——包括所有隱藏和被篩選掉的行。如果您希望只隔離並導出篩選結果，而排除不需要的數據，這可能會造成問題。

在以下部分中，您將找到幾種實用的方法，用於將僅篩選的數據導出到Excel中的CSV文件。每種方法都有其優勢，並適用於不同的用戶需求和場景。請通讀並選擇最適合您的工作流程和Excel熟練程度的解決方案：

使用“僅複製可見單元格”將Excel中的僅篩選數據保存/導出到CSV文件

通過VBA代碼將Excel中的僅篩選數據保存/導出到CSV文件

使用Kutools for Excel將Excel中的僅篩選數據保存/導出到CSV文件

通過Power Query導出篩選數據

使用“僅複製可見單元格”將Excel中的僅篩選數據保存/導出到CSV文件

Excel本身不允許您直接保存僅篩選（可見）的行為CSV文件。但是，您可以使用一個簡單的解決方法來實現目標。這種方法適合那些希望避免復雜功能或編程的人。以下是詳細步驟：

1. 在工作表上應用篩選後，選擇要保存的篩選數據範圍。確保包含標題行（如果需要），以便在導出的文件中更加清晰。

2. 在功能區上，轉到“主頁”>“查找與選擇”>“定位特殊”。此選項可幫助您僅選擇可見單元格。請參閱截圖：

3. 在“定位特殊”對話框中，選擇“僅可見單元格”選項。這樣可以確保僅選擇顯示的（篩選後）行，不會意外複製隱藏的行。

4. 點擊“確定”後，複製所選範圍（您可以按Ctrl+C或右鍵單擊並選擇“複製”），然後打開一個新的工作表並粘貼數據（使用Ctrl+V）。只有可見（篩選後）的行會出現——隱藏的行被排除在外，因此您的數據集現在已準備好進行導出。

5. 要導出這些數據，轉到“文件”>“另存為”。在“另存為”對話框中，選擇所需的文件名和位置。從“保存類型”下拉列表中，選擇“CSV（逗號分隔）（*.csv）”。請參閱截圖以獲取指導：

6. 點擊“保存”。您可能會收到一個彈出警告，提示“您的工作簿中的某些功能可能會丟失”，或者詢問是否只想保存活動工作表。這是CSV導出的標準提示。請點擊“確定”並確認“是”。您的篩選數據現在已保存為位於您選擇目錄中的CSV文件。

該方法簡單直接且不需要編程技能。但是，如果您經常重複操作或處理非常大的數據集，可能會稍微耗時。在保存之前，請務必仔細檢查新工作表中的粘貼數據，以確認僅包含可見的行。如果您需要頻繁導出篩選數據，請考慮以下自動化方法。

使用VBA代碼將Excel中的僅篩選數據保存/導出到CSV文件

如果您定期處理篩選數據導出，或者想要更快、自動化的解決方案，可以使用VBA宏。這特別適合希望減少手動步驟並以程序方式導出範圍的情況。以下是逐步指南：

1. 按Alt + F11打開Microsoft Visual Basic for Applications（VBA）編輯器。這將打開一個新窗口，您可以在其中管理Excel宏。

2. 在VBA編輯器中，點擊“插入”>模組以添加新模組。將以下VBA代碼複製並粘貼到空白模組窗口中。

VBA代碼：將Excel中的僅篩選數據保存/導出到CSV文件

Sub Macro1()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    Dim xUpdate As Boolean
    Dim xFileName As String
    Dim xWb As Workbook
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("please select the filtered range", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xRg = xRg.SpecialCells(xlCellTypeVisible)
    If xRg Is Nothing Then Exit Sub
    xFileName = Application.GetSaveAsFilename(, "CSV Files (*.csv), *.csv", , "please specify the file name")
    If xFileName = "" Then Exit Sub
    xUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    xRg.Copy
    Set xWb = Application.Workbooks.Add
    xWb.ActiveSheet.Paste
    xWb.SaveAs Filename:=xFileName, FileFormat:=xlCSV, CreateBackup:=False
    xWb.Close False
    Application.ScreenUpdating = xUpdate
End Sub

3. 將代碼放置到位後，按F5或點擊“運行”按鈕執行。您將看到一個提示，要求您選擇要導出為CSV文件的篩選數據範圍。使用鼠標選擇相關單元格並點擊“確定”。

4. 接下來，另一個對話框出現，提示您指定CSV文件的文件名和存儲位置。選擇或創建目標目錄並輸入文件名，如下所示：

5. 點擊“保存”，宏將僅導出您選擇中的可見單元格到CSV文件。隱藏的行——即被篩選掉的行——將不會被包括在內。

此VBA解決方案快速、準確，非常適合重複任務或批量導出。然而，您需要基本熟悉啟用宏和使用VBA編輯器的操作。在運行新宏之前，務必保存您的工作並備份重要文件。如果遇到錯誤，請檢查您的選擇是否包含可見單元格（篩選數據），並確認您有權限寫入所選目錄。

使用Kutools for Excel將Excel中的僅篩選數據保存/導出到CSV文件

Kutools for Excel提供了一個名為“導出區域至文件”的專用功能。這個工具使得將選定單元格——包括篩選數據——導出到CSV、PDF、文本或其他格式變得更加容易。這對於希望獲得可靠解決方案的用戶來說是理想的選擇，特別是如果導出篩選數據是您工作流程中的常見任務。

如果您已經安裝了Kutools for Excel，請按照以下步驟操作：

1. 首先，應用所需的篩選並選擇要導出的可見數據。確保選擇中僅包含相關（篩選後）的行。

2. 轉到功能區上的“Kutools Plus”，選擇“導入與導出”，然後選擇“導出區域至文件”。請參閱下面的截圖以定位此選項：

3。在 導出區域至文件 對話框中，從 文件類型 部分選擇文件格式（例如，CSV）。點擊 瀏覽並選擇保存導出文件的文件夾。請參閱下面的示例：

4. 確認位置和設置後，點擊“確定”。另一個提示將出現，要求您為導出的文件命名。輸入所需的名稱並確認。

5. 再次點擊“確定”。所選的篩選數據將作為CSV文件保存在您選擇的位置。只有您選擇的可見單元格被導出——隱藏的行被忽略。

對於需要重複導出、靈活格式選項或對VBA不太熟悉的用戶，強烈推薦使用Kutools for Excel。除了CSV之外，您還可以直接導出為文本、PDF和其他多種格式，節省時間並減少手動操作中的錯誤風險。

立即下載並免費試用Kutools for Excel！

如果遇到意外結果或文件缺少數據，請在導出前確認您的選擇僅包含預期的可見單元格。此外，請注意對話框中的文件夾權限和文件格式設置，以避免常見問題。

演示：使用Kutools for Excel將Excel中的僅篩選數據保存/導出到CSV文件

通過Power Query導出篩選數據

Power Query（獲取與轉換）可用於提取並保存篩選數據。這方法適合使用現代Excel版本（Excel2016及更高版本）並且希望自動化重複導出的用戶：

1. 選擇您的數據並轉到“數據”>“從表格/範圍”以啟動Power Query編輯器（您的範圍必須具有標題）。

2. 在Power Query中，直接在相關列上應用所需的篩選。

3. 點擊“主頁”>“關閉並加載到”並選擇“僅創建連接”或“新工作表中的表格”。

4. 篩選結果現在出現在新工作表中。像平常一樣導出（文件 > 另存為 > CSV）。

Power Query對於需要計劃數據導出或想創建可重用查詢模板的用戶非常實用。初始設置對於初學者可能較為複雜，但對於數據集變換和重複使用非常高效。