利用Excel从文件夹中提取所有文件名
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
利用 Excel 从文件夹中提取所有文件名
2003/02/21 13:55 赛迪网--中国电脑教育报
文/万兵
有时我们想要把一个文件夹中的所有文件名整理到一个文件中,便于管理和查询以 及打印,多数是使用“复制”、“粘贴”方法(将文件夹中的文件重命名,在可编辑状态 下进行复制,而后在其他文档中粘贴)。这种办法可行,但对于文件夹中有大量的文件的 情况,则工作效率低,而且做完后必须核对。 利用 DOS 的重定向命令“〉”加 Excel 的引用外部数据功能可实现方便快捷的方法 (关于 DOS 中的重定向“〉”,《中国电脑教育报》2002 年第 25 期 A35 版中《重定向的妙用》 已详细介绍)。
假设我们要提取 C 盘下的 Windows 目录下的所有文件及文件夹名。 第 1 步在 DOS 或 Windows 98 的 MS-DOS 方式下,输入如下命令:C:\windows\dir〉 d:\1.txt(回车)
第 2 步打开一个新的 Excel XP 电子表格,单击工具栏中的“数据”下拉菜单,选择 “导入外部数据→导入数据”命令,打开“导入数据”对话框,在“查找范围”中找到 D 盘下的 1.txt 文档,单击“打开”,进入“文本导入向导-3 步骤之 1”(如图 1)。
第 3 步在“原始数据类型”单选框中选“分隔符号”后按“下一步”,进入“文本 导入向导-3 步骤之 2”(如图 2)。
第 4 步在“分隔符号”复选框中选“分号、逗号、空格、其他”,并在“其他”后 的空格中填“.”,按“下一步”,进入“文本导入向导-3 步骤之 3”(如图 3)。
第 5 步单击“完成”,出现“导入数据”对话框,选择“现有工作表”单选框后按 “确定”。
到了这里,你应可以看到 8 列数据,第一列便是所要的“文件名”。但是,DIR 命 令的显示的中文文件名只显示 3~4 个汉字,别急,看看第 7 列(G 列),所有的完整的文 件名都在这里(如图 4)!第 8 列是文件名的后缀,方便于筛选(对于 Excel 2000,所不同 的是在工具栏中的“数据”下拉菜单下,选择的是“获取外部数据/导入文本文件”命 令)。
至此,你就可以用 Excel 来编辑这些文件名了。
FL=FILES(path&目录!$A$2)&T(NOW()) path=MID(CELL("filename"),1,FIND("[",CELL("filename"),1)-1)
进入 DOS 模式 ,进入这个目录 然后 dir > abc.txt 这样就把该目录下的所有文件保存在 abc.txt 中了 如果存在子目录就 dir > abc.txt /s 如果制定某种类型的文件就 dir *.xls > abc.txt (文本文件中包含 abc.txt 这个文件名)
======================================================= 如果你对 DOS 不熟悉的话,具体步骤如下: 1、在 XP 中打开这个文件夹,然后在地址栏中复制该文件夹的地址 2、开始-程序-附件-命令提示符 (进入 DOS 模式) 3、 用键盘输入(X:) (输入()里的内容, X 表示具体的盘符, 如果是相同的盘这一步可以省略) , 输入结束后要回车一下 4、输入(cd )然后点鼠标右键-粘贴 (cd 后面有一个空格,在 DOS 模式不好用 Ctrl+V 这样的 快捷键) 5、然后输入上述的 DOS 命令 Dos 命令中不区分大小写
批量提取文件名的办法 2008 年 06 月 15 日 星期日 00:00
文件名提取器 超级好用哦,去百度搜索吧.
批量提取文件名的办法 方法一:tree 命令 命令提示符下: (开始/运行/CMD) tree (要获得文件名的文件夹的路径)/f >(存放的路径/filename) 例如:要获得 C 盘下的所有文件的文件名,并将生成的文件保存到 D 盘,可使 用如下命令 tree□C:□/f >D:/contents.txt “□”代表一个空格 小 tip: 可以先在记事本中写好,将其粘贴(注意:不能用 Ctrl+V)到 cmd.exe 程序中。 例:将下列复制到 cmd.exe 中即可 tree D: /f>E:/contents.xls 方法二:dir 命令 dir c:\ >d:\1.txt 将 C 盘根目录里的文件夹名和文件名都保存在 D 盘目录下的 1.txt 里,此文件可 导入 excel 作进一步处理。dir 可加参数 /w 等。 其他: 若是音乐文件,可将音乐文件拖进千千静听等播放软件,然后另存为播放列表。 此列表用记事本打开即可查看 Other 领导布置任务: 把最近几年的个人论文列一个清单给我看。天哪,个人论文?单位近百人,每个 人每年一篇论文,如果都列出来,还不把我累死?仔细一想,总结全部放在 “D:\lunwen”这个文件夹中,而且我原来使用论文的名称+作者名作为文件名 来使用,也就是说,只要把文件名提取出来,那么清单自然就列出来了。 赶紧动手,在“运行”中键入“CMD”进入命令提示符窗口,然后切 换命令提示符的状态到“D:\lunwen”,输入“dir /b huizong,txt”,参数“/b”表
示仅提取文件名。这样“lunwen”文件夹中的所有文件名都被提取到 “huizong,txt”这个文本文件中。 现在打印出来,可以向领导交差了。 如果想把 MP3 格式的那就用这个 开始——运行——CMD——输入你要搞的那个盘如:D:然后输入这个 dir 盘符:\*.mp3 /s /a /b>>列表.txt 相关文章 /mmsio/blog/item/0a3437970dd6406b55fb962c.html
Excel VBA 代码:批量获取指定目录下所有文件名
2009 年 5 月 15 日 阅读评论 发表评论
在 Excel 中获取指定目录下的所有文件名,请自行修改输出的格式,配合 Excel VBA 代码:批量插入指定 目录下图片代码使用,事半功倍!代码如下:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
Sub listfile() ''''''''''''''''''''''''''''''''''''''''''''' ' 宏由 录制,时间: 2009-5-12 ' ' 批量获取指定目录下所有文件名 ' Dim fs Dim mypath As String Dim theSh As Object Dim theFolder As Object On Error Resume Next '设置搜索路径 Set theSh = CreateObject("shell.application") Set theFolder = theSh.BrowseForFolder(0, "", 0, "") ' '
''''''''''''''''''''''''''''''''''''''''''''