如何使用excel提取文件夹中的所有文件名称？

使用excel提取文件夹中的所有文件名尺雀携称的方法主要有以下两个：\x0d\x0a1、在那个文件夹内新建一个.TXT文件（如wenjian.txt），用记事本单开输入\x0d\x0adir>1.txt\x0d\x0a保存退出\x0d\x0a将刚才的.TXT（wenjian.txt）更名为.bat文件陵伏（wenjian.bat）\x0d\x0a双击wenjian.bat文件运行一次，在文件夹内多出一个1.txt文件\x0d\x0a打开1.txt文件，将其中的内容粘贴到Excel中，数据——分列处理就可以得到你要的文件名列表了！\x0d\x0a2、VBA（2003版）\x0d\x0a在那个文件夹下新建Excel文件，打开新建的Excel文件，右击工作表标签（如Sheet1），查看代码——在代码编辑器中输入以下代码\x0d\x0aSub Test()\x0d\x0aDim i As Integer\x0d\x0aDim strPath As String\x0d\x0astrPath = ThisWorkbook.Path\x0d\x0aWith Application.FileSearch\x0d\x0a .LookIn = strPath\x0d\x0a .SearchSubFolders = True\x0d\x0a .Filename = "*.*"\x0d\x0a If .Execute >0 Then\x0d\x0a For i = 1 To .FoundFiles.Count\x0d\x0a Range("A" &i) = .FoundFiles(i)\x0d\x0a Next i\x0d\x0a End If\x0d\x0aEnd With\x0d\x0aEnd Sub\x0d\x0a回到Excel表岁衡格中，工具——宏——宏——选择Sheet1.Test——执行\x0d\x0a\x0d\x0a方法一简单的 *** 作就可以，方法二需要对程序有一定的了解，方法二通用性比较强，需要的时候执行一下就可以，更快捷。

批量提取文件名的方法，请按下面的步骤 *** 作

使用的工具：优速文件名提取器

步骤1，打开电脑后再打开已经安装好的工具“优速文件名提取器”软件，点击界面左边的“文件名”图标，然后再点击【添加文件】蓝色按键，将需要提取名称的文件全部导入掘知罩到软件中。

步骤2，设置导出名称，如果不设置的话就使用默认的名称，导出格式选择“xlsx”，这是excel文件格式最后选择文件名中是否包含后缀。最后设置输出目录，用来保猛圆存导出来的excel文件。

步骤3，完成所有设置后，点击右上角的【开始提取】按键启动软件，提取完成后软件会自动判闹打开输出文件夹，包含所有文件名的excel导出文件就保存在这里。

步骤4，我们从案例的结果可以看到，所有的文件名一次性全部提取到了excel表格的第一列，文件名提取成功。

---