WPS怎么批量提取文件夹里的文件名？3招教你秒级搞定（附全自动VBA脚本）

最省事（无代码）：在文件夹地址栏输入 cmd 回车，输入 DIR /B > file.txt，复制Txt里的内容直接贴进 WPS 表格。

最灵活（宏/VBA）：打开 WPS 表格，按 ALT + F11 粘贴自动化脚本，选择目标文件夹，一秒抓取完整文件名、文件类型及更新时间。

最安全（日常排查）：提取完报表后，推荐配合 WPS表格隐藏公式只显示数值 操作，防止导出的文件名索引被其他人误删修改。

方法一：系统CMD极速提取法（零成本，3秒搞定）

步骤解析

1. 打开你需要提取文件名的目标文件夹。
2. 鼠标点击顶部路径地址栏，清空路径并直接输入 cmd，按 Enter 键。此时系统会自动弹出一个黑色的终端窗口。
3. 在黑框里输入指令：DIR /B > filename.txt（注意 DIR 和 /B 之间有空格），然后按下回车。
4. 回到文件夹，你会发现多出了一个名为 filename.txt 的文本文件。打开它，所有文件名（含后缀）已经排列得整整齐齐。
5. Ctrl+A 全选，复制并直接粘贴进 WPS 表格即可。

DIR 命令参数补充（内行隐藏参数）：
DIR /B /A-D > filename.txt  --> 仅提取文件，剔除文件夹本身
DIR /B *.xlsx > filename.txt --> 仅提取 Excel 格式的文件

方法二：WPS VBA/宏脚本（强力推荐，全自动一键抓取）

实战代码

Sub BatchExtractFilenames()
    Dim folderPath As String
    Dim fileName As String
    Dim rowNum As Long
    Dim fd As FileDialog
    
    ' 弹出文件夹选择框
    Set fd = Application.FileDialog(msoFileDialogFolderPicker)
    If fd.Show = -1 Then
        folderPath = fd.SelectedItems(1) & "\"
    Else
        Exit Sub
    End If
    
    ' 初始化表格表头
    Cells(1, 1).Value = "序号"
    Cells(1, 2).Value = "文件名"
    Cells(1, 3).Value = "文件路径"
    rowNum = 2
    
    Application.ScreenUpdating = False
    
    ' 遍历文件夹
    fileName = Dir(folderPath & "*.*")
    Do While fileName <> ""
        Cells(rowNum, 1).Value = rowNum - 1
        Cells(rowNum, 2).Value = fileName
        Cells(rowNum, 3).Value = folderPath & fileName
        rowNum = rowNum + 1
        fileName = Dir
    Loop
    
    Application.ScreenUpdating = True
    MsgBox "文件名提取完成！共计提取 " & (rowNum - 2) & " 个文件。", vbInformation, "WPS高效办公"
End Sub

实操踩坑提示：

部分免费版 WPS 默认没有开启 VBA 组件，如果按 ALT + F11 没有反应，需要先安装 WPS 的 VBA 支持库，或者直接使用 WPS 自带的 JSA（JavaScript for Applications） 脚本。

方法三：自定义函数 + 宏表函数 FILES（适合不离开表格的场景）

操作流程

1. 定义名称：在 WPS 表格中，点击菜单栏的 【公式】->【名称管理器】->【新建】。
2. 填写参数：
   • 名称输入：GetFiles
   • 引用位置输入：=FILES("C:\你的文件夹路径\*.*")
3. 调用结果：在单元格中输入公式 =INDEX(GetFiles, ROW(A1))，向下拖拽填充，即可依次显示出文件夹内的文件名。

方案对比与适用场景

核心操作 SOP 检查清单 (Checklist)

• [ ] 路径检查：文件夹路径中是否包含罕见的特殊符号（如 #, %），防止 CMD 或脚本读取报错。
• [ ] 显示后缀：在 Windows 资源管理器中勾选“文件扩展名”，确保抓取到的文件名包含 .docx, .pdf 等格式后缀。
• [ ] 隐藏文件处理：检查文件夹中是否存在隐藏的系统缓存文件（如 Thumbs.db），防止其一同被写入表格。
• [ ] 公式转换：若使用公式抓取，提取完成后请务必全选复制，并粘贴为“数值”。建议配合 WPS表格隐藏公式只显示数值 操作，避免源路径变更导致表格内容全部报错 #VALUE!。
• [ ] 权限管控：导出的文件名及路径清册若涉及敏感业务，分发前需参考 WPS文档怎么设置只读权限 给文档施加保护，防止他人任意修改数据。

FAQ（常见问题解答）

Q1：提取出的文件名带后缀（如 .docx），怎么快速把后缀去掉？

Q2：如何同时提取子文件夹里的所有文件名？

Q3：WPS 提取文件名出来后全是乱码怎么办？