使用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.点开始菜单,就能看到上面的界面,选择“运行”!你点了运行程序后,在里面输入“cmd”点击确定会进入命令提示符串口
2.打个比方说,文件在C盘里面的111文件夹,要读取里面的文件的文件名字
3.利用cd命令到达要读取文件名的文件夹,用法是这样的:命令为“cd c:\111”
4.然后会看到下面的这个情况:
5.然后输入命令“dir /b>d:1.xls”然后回车
6.到D盘就能看到一个名称为1.xls的文件
7.打开就是了
评论列表(0条)