如何将 Excel 中的筛选结果单独保存或导出为 CSV 文件？
在 Excel 中处理大型数据集时，通常会应用筛选器以聚焦于特定子集。然而，有时您可能希望仅将筛选后（可见）的行保存或导出到单独的 CSV 文件中，用于报告、数据交换或进一步分析。默认情况下，Excel 的另存为功能在保存为 CSV 文件时会导出整个工作表——包括所有隐藏和被筛选掉的行，这可能导致您无法仅获取所需的筛选结果。
以下各节介绍了几种在 Excel 中将筛选后的数据导出为 CSV 文件的实用方法。每种方法各具优势，适用于不同的用户需求和使用场景。请通读全文，并选择最适合您工作流程及 Excel 熟练程度的解决方案。
使用“仅复制可见单元格”功能将 Excel 中的筛选数据保存/导出为 CSV 文件
使用 VBA 代码将 Excel 中的筛选数据保存/导出为 CSV 文件
使用 Kutools for Excel 将 Excel 中的筛选数据保存/导出为 CSV 文件
使用“仅复制可见单元格”功能将 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 等多种格式，省时高效，显著降低手动操作出错的风险。
如遇异常结果或导出文件缺失数据，请在导出前确认所选区域仅包含所需的可见单元格。同时，请留意对话框中的文件夹权限与文件类型设置，以规避常见问题。
演示：仅将 Excel 中的筛选数据保存/导出为 csv 文件 Kutools for Excel
通过 Power Query 导出筛选数据
Power Query（获取和转换）可用于提取并保存筛选后的数据，非常适合使用现代 Excel 版本（Excel 2016 及更高版本）且希望自动化实现可重复导出的用户。
1. 选择您的数据，然后转到数据> 从表格/区域 以启动 Power Query 编辑器（您的数据区域必须包含标题）。
2. 在 Power Query 中，直接对相关列应用所需筛选条件。
3. 单击主页> 关闭并加载到，然后选择“仅创建连接”或“在新工作表中创建表格”。
4. 筛选结果现已显示在新工作表中，可按常规方式导出（文件> 另存为> CSV）。
Power Query 非常适合需要定期导出数据或创建可重用查询模板的用户。尽管初学者可能会觉得初始设置略显复杂，但它在数据集转换和重复利用方面效率极高。
最佳办公效率工具
| 🤖 | KUTOOLS AI 助手：基于以下内容革新数据分析：智能执行 | 生成代码| 创建自定义公式 | 数据分析及生成图表| 调用 Kutools Functions…… |
| 热门功能：查找、高亮或标记重复项 | 删除空白行 | 合并列或单元格且不丢失数据 | 不使用公式的四舍五入…… | |
| 高级 LOOKUP：多条件 VLookup | 多值 VLookup | 跨多工作表 VLookup | 模糊查找…… | |
| 高级下拉列表：快速创建下拉列表 | 级联下拉列表 | 多选下拉列表…… | |
| 列管理器：添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列…… | |
| 特色功能：网格聚焦 | 设计视图 |增强编辑栏 | 工作簿和表管理器 | 资源库（自动文本）| 日期提取 | 汇总工作表 | 加密/解密单元格 | 按列表发送邮件 | 超级筛选 | 特殊筛选（筛选粗体单元格/斜体/删除线……） ...... | |
| 精选 15 工具集：12 文本工具（添加文本，删除特定字符，……）| 50+ 图表 类型（甘特图，……）| 40+ 实用公式（基于生日计算年龄，……）| 19 插入工具（插入二维码，从路径插入图片，……）| 12 转换工具（小写金额转大写，汇率转换，……）| 7 合并和拆分工具（高级合并行，分割单元格，……）|……更多 |
使用 Kutools for Excel 大幅提升您的 Excel 技能，体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能，助您提升生产力、节省时间。立即点击此处，获取您最需要的功能……
Office Tab 为 Office 带来标签式界面，让您的工作更轻松
- 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
- 在同一个窗口的新标签页中打开并创建多个文档，而非在新窗口中。
- 将您的工作效率提升 50%，每天减少数百次鼠标点击！
所有 Kutools 插件，一个安装程序
Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro，非常适合需要跨多个 Office 应用高效协作的团队。
- 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
- 一个安装程序，一个许可证— 几分钟内完成设置（支持 MSI）
- 协同效果更佳— 在多个 Office 应用中实现高效协同
- 30 天全功能试用— 无需注册，无需信用卡
- 超值之选— 比单独购买插件更省钱