使用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.先根据自己的需求选择导出格式,今天我们选择(excel格式);然后设置输出目录文件夹,用来保存导出的excel文件,如果不设陆培慎置则默认保存在电脑桌面上。3.最后我们点击软件右上角【开始提取】红色按钮,启动软件程序,等待一小会,提取完成后软件会自动打开输出文件夹,包含所有文件名称的excel表格就保存在这里面。4.打开中颂导出的excel文件后可以看到,我们成功的将所有文件名称全部提取到了excel表格的第一列里面。
这样既可做到批量提取文件名。
评论列表(0条)