使用excel提取文件夹中的所有文件名称的方法主要有以下两个:
1、在那个文件夹内新建一个TXT文件(如wenjiantxt),用记事本单开输入
dir> 1txt
保存退出
将刚才的TXT(wenjiantxt)更名为bat文件(wenjianbat)
双击wenjianbat文件运行一次,在文件夹内多出一个1txt文件
打开1txt文件,将其中的内容粘贴到Excel中,数据——分列处理就可以得到你要的文件名列表了!
2、VBA(2003版)
在那个文件夹下新建Excel文件,打开新建的Excel文件,右击工作表标签(如Sheet1),查看代码——在代码编辑器中输入以下代码
Sub Test()
Dim i As Integer
Dim strPath As String
strPath = ThisWorkbookPath
With ApplicationFileSearch
LookIn = strPath
SearchSubFolders = True
Filename = ""
If Execute > 0 Then
For i = 1 To FoundFilesCount
Range("A" & i) = FoundFiles(i)
Next i
End If
End With
End Sub
回到Excel表格中,工具——宏——宏——选择Sheet1Test——执行
方法一简单的 *** 作就可以,方法二需要对程序有一定的了解,方法二通用性比较强,需要的时候执行一下就可以,更快捷。
可以打开“资源管理器”,在要得到文件列表的文件夹内建立一个批处理文件如GETLISTBAT,文件内容只有如下一行命令:DIR /B >LISTTXT。双击执行该批处理文件就可以得到文件夹下所有文件的列表文件LISTTXT。其中的参数/B表示使用没有标题信息或摘要的方式显示文件列表,后面的>LISTTXT表示将文件列表输出到一个文件LISTTXT文件中。
方法/步骤
首先我们打开excel,点击公式tab,找到“定义名称”并点击
在“编辑名称”d窗中,输入名称“文件名称列表,引用位置输入“
=FILES("D:\R语言学习20161118\"),点击“确定”
”
然后,我们在A1单元格输入“=INDEX(文件名称列表,ROW(A1))”,回车。就完成了。INDEX是在指定区域中,返回行列交叉值,ROW返回的是行号,A1 返回 1
如果首行不在A1,在A3的话,公式 “=INDEX(文件名称列表,ROW(A3)-2)“。INDEX是在指定区域中,返回行列交叉值,ROW返回的是行号,A1 返回 1 ,如果首行不在A1,在A3的话,公式 “=INDEX(文件名称列表,ROW(A3)-2)“,回车,下拉,完成。
进入D盘位置,去"R语言学习20161118"文件夹验证一下,发现数据只提取了单个文件,未提取里面的文件夹的名称,大家借鉴的时候要注意。
6
关于分享经验中用到的函数,大家可以下载 excel帮助文档,查看各个函数的使用方法,含义。 或者大家在输入函数的时候,也会出现简单的提醒
工具/原料
电脑
方法/步骤
我的电脑E盘:\music文件夹内存放很多音乐相关的文档,我想提取他们的名称。首先在需要提取名称的文件夹内新建一个文本文档(即txt文件)。
打开新件的文本文档,并输入DIR /B > 文件名称列表txt
保存后关闭。
将新建文本文档的后缀有txt更改为bat并保存。此时会d出警告提示:如果更改扩展名肯导致文件不可用。点击“是”即可。形成一个DOS批处理文件。
双击该文件,形成一个文件名为“文件名称列表txt”的文本文档。打开该文件,目标文件夹内的文件清单就形成了。
步骤阅读
5
如果想得到excel或Word格式的文件 ,只需要在第二步输入DIR /B > 文件名称列表txt时将后缀改为xls或doc即可。
以上就是关于如何使用excel提取文件夹中的所有文件名称全部的内容,包括:如何使用excel提取文件夹中的所有文件名称、如何获取文件名、如何提取文件件内所有文件的名称等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)