如何将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、文本或其他格式变得更加容易。这对于希望获得可靠解决方案且不想使用VBA代码或手动选择的用户来说是一个理想的选择，特别是当导出筛选数据是你工作流中的常见任务时。

如果你已安装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版本（Excel 2016及更高版本）并希望自动执行重复导出的用户：

1. 选择你的数据并转到“数据”>“从表格/范围”以启动Power Query编辑器（你的范围必须包含标题）。

2. 在Power Query中，直接对相关列应用所需的筛选。

3. 单击“首页”>“关闭并加载到”，并选择“仅创建连接”或“在新工作表中创建表”。

4. 筛选结果现在出现在新工作表中。像平常一样导出（文件 > 另存为 > CSV）。

Power Query适用于需要定期数据导出或希望创建可重复使用的查询模板的用户。初始设置对初学者来说可能稍显复杂，但对于数据集转换和重复使用而言，它非常高效。