当前位置：文档库 › 利用Excel从文件夹中提取所有文件名

利用Excel从文件夹中提取所有文件名

利用 Excel 从文件夹中提取所有文件名
https://www.wendangku.net/doc/513256521.html, 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 相关文章 https://www.wendangku.net/doc/513256521.html,/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() ''''''''''''''''''''''''''''''''''''''''''''' ' 宏由 https://www.wendangku.net/doc/513256521.html, 录制，时间: 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, "") ' '
''''''''''''''''''''''''''''''''''''''''''''

18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42
If Not theFolder Is Nothing Then mypath = theFolder.Items.Item.Path End If '搜索开始 Set fs = Application.FileSearch With fs .NewSearch .SearchSubFolders = True '搜索子目录 .LookIn = mypath .Filename = "*.JPG" '搜索路径 '搜索文件类型为 JPG
If .Execute(SortBy:=msoSortByFileName) > 0 Then c = .FoundFiles.Count For i = 1 To c strTemp = .FoundFiles(i) n = InStrRev(strTemp, "\") （不包括文件名） '获取文件名及扩展名 strfilename = Replace(strTemp, Left(strTemp, n), "") ' Cells(i, 1) = strTemp 路径+文件名+扩展名 ' Cells(i, 1) = Mid(strTemp, n + 1) '输出格式为：文件名+扩展名 '从 D8 单元格开始输出格式为：文件名，请自行修改。 Cells(i + 7, 4) = Left(strfilename, Len(strfilename) - 4) '输出格式为：文件 '设置临时文件 '获取文件路径长度 '统计搜索到的文件个数

Next Else MsgBox "该文件夹里没有符合要求的文件!" End If End With Set fs = Nothing End Sub

java对文件名的几个操作,获取文件扩展名,去掉扩展名

java对文件名的几个操作，获取文件扩展名，去掉扩展名 /** * Return the extension portion of the file's name . * * @see #getExtension */ public static String getExtension(File f) { return (f != null) ? getExtension(f.getName()) : ""; } public static String getExtension(String filename) { return getExtension(filename, ""); } public static String getExtension(String filename) { return getExtension(filename, ""); } public static String getExtension(String filename, String defExt) { if ((filename != null) && (filename.length() > 0)) { int i = https://www.wendangku.net/doc/513256521.html,stIndexOf('.'); if ((i >-1) && (i < (filename.length() - 1))) { return filename.substring(i + 1); } } return defExt; } public static String trimExtension(String filename) { if ((filename != null) && (filename.length() > 0)) { int i = https://www.wendangku.net/doc/513256521.html,stIndexOf('.'); if ((i >-1) && (i < (filename.length()))) { return filename.substring(0, i); } } return filename; } substring(参数)是java中截取字符串的一个方法有两种传参方式

Excel提取文件夹中的所有文件名称

Excel提取文件夹中的所有文件名称 1.E xcel提取文件夹中的所有文件名称 1、在那个文件夹内新建一个.TXT文件（如wenjian.txt），用记事本单开输入dir> 1.txt 保存退出将刚才的.TXT（wenjian.txt）更名为.bat文件（wenjian.bat）双击wenjian.bat文件运行一次，在文件夹内多出一个1.txt文件打开1.txt文件，将其中的内容粘贴到Excel中，数据——分列处理就可以得到你要的文件名列表了！ 2、VBA（2003版）在那个文件夹下新建Excel文件，打开新建的Excel文件，右击工作表标签（如Sheet1），查看代码——在代码编辑器中输入以下代码 Sub Test() Dim i As Integer Dim strPath As String strPath = ThisWorkbook.Path With Application.FileSearch .LookIn = strPath .SearchSubFolders = True .Filename = "*.*" If .Execute > 0 Then For i = 1 To .FoundFiles.Count Range("A" & i) = .FoundFiles(i) Next i End If End With End Sub 回到Excel表格中，工具——宏——宏——选择Sheet1.Test——执行看看效果吧！ 2.E xcel单元格中显示该文件夹内的文件数量或名称假设这个文件夹是 D:\fda 1、插入]-[名称]-[定义]，或按CTRL+F3，打开excel→名称管理器→定义一个名称→比如：aaa 引用位置输入：=FILES("d:\fda\*.*") &T(NOW())

提取文件夹中全部文件的文件名的方法

提取文件夹中全部文件的文件名的方法 2014年1月11日星期六方法一： 1、打开一个记事本文档，然后复制下列内容到文档中。 @echo off dir /s/b *.* > 文件名.txt exit 以上内容必须是Office Calibri (西文正文)字体即可生效。 2、将上述内容复制到要提取文件名的文件夹，然后将该文件改名为X.bat(X可为任意名称)，然后双击运行，就能完成你的要求了。方法二：有时我们想要把一个文件夹中的所有文件名整理到一个文件中，便于管理和查询以及打印，多数是使用“复制”、“粘贴”方法（将文件夹中的文件重命名，在可编辑状态下进行复制，而后在其他文档中粘贴）。这种办法可行，但对于文件夹中有大量的文件的情况，则工作效率低，而且做完后必须核对。利用DOS的重定向命令“〉”加Excel的引用外部数据功能可方便快捷的实现。假设我们要提取C盘下的Windows目录下的所有文件及文件夹名。第1步：在DOS或Windows98的MS-DOS方式下，输入如下命令：C:\windows\dir〉d:\1.txt(回车) 第2步：打开一个新的ExcelXP电子表格，单击工具栏中的“数据”下拉菜单，选择“导入外部数据→导入数据”命令，打开“导入数据”对话框，在“查找范围”中找到D盘下的1.txt文档，单击“打开”，进入“文本导入向导-3步骤之1”（如图1）。第3步：在“原始数据类型”单选框中选“分隔符号”后按“下一步”，进入“文本导入向导-3步骤之2”（如图2）。

第4步：在“分隔符号”复选框中选“分号、逗号、空格、其他”，并在“其他”后的空格中填“.”，按“下一步”，进入“文本导入向导-3步骤之3”（如图3）。第5步：单击“完成”，出现“导入数据”对话框，选择“现有工作表”单选框后按“确定”。到了这里，你应可以看到8列数据，第一列便是所要的“文件名”。但是，DIR命令的显示的中文文件名只显示3～4个汉字，别急，看看第7列（G列），所有的完整的文件名都在这里（如图4）！第8列是文件名的后缀，方便于筛选（对于Excel2000，所不同的是在工具栏中的“数据”下拉菜单下，选择的是“获取外部数据/导入文本文件”命令）。至此，你就可以用Excel来编辑这些文件名了。方法三: dir命令例如：将C盘根目录里的文件夹名和文件名都保存在D盘目录下的aa.txt里，输入命令：“dir c:\>d:\aa.txt”（注意：dir后面有1个空格，即dir［空格］［文件目录］>［保存文件名目录］\［文件名］.txt）这样所有文件夹及文件名就保存到了aa.txt里面了；此文件可导入excel作进一步处理。dir可加参数/w 等。例如：命令提示符格式：“dir d:\电脑软件>e:\文件名.txt”。

Windows中快速获取文件目录的几种方法

Windows中快速获取文件目录的几种方法文章来源：文章作者：发布时间：2007-03-05 字体：[大中小] 计算机使用时间越长，硬盘中保存的文件就会越来越多，如果不对这些众多的文件创建合适的目录，那么日后要寻找某个文件将变得非常困难。为了提高文件定位的速度，许多人都用手工复制文件名的方法创建了文件目录，不过这种方法在文件数量不多的情况下还能凑合，但如果计算机中存在的文件太多的话，那用这种方法生成文件目录时效率就十分低下了。有鉴于此，笔者特意总结了如下几则快速生成文件目录的技巧，仅供各位参考交流! 借用ACDSEE，自动生成文件目录通常情况下，我们的计算机中都会装有ACDSEE之类的看图软件，不要以为该软件只能帮助我们快速浏览图象哟，其实它还有许多鲜为人知的用处，这不现在笔者就用它来快速获取指定文件夹下面的所有文件目录名。用鼠标双击系统桌面上的ACDSEE快捷图标，打开ACDSEE程序界面;在该界面左侧区域找到需要生成文件目录的指定文件夹，然后用鼠标将它选中，随后我们就能在该界面的右侧区域看到指定文件夹下面的所有文件内容; 下面，单击ACDSEE程序界面中的“工具”菜单项，从弹出的下拉菜单中执行“选项”命令，在其后弹出的选项设置窗口中单击“文件列表”标签，打开如图1所示的标签页面。在该页面“可选项”设置项处，选中“显示隐藏文件”选项，再单击“确定”按钮，这样就能确保ACDSEE程序能把隐藏文件的名称也列写在文件目录中了; 图 1 接下来依次单击菜单栏中的“工具”/“生成文件列表”命令，随后屏幕会自动弹出记事本窗口，将指定文件夹中的所有文件名称列写成目录，此时我们可以依次单击记事本窗口中的“文件”/“保存”菜单项，以便将ACDSEE程序自动生成的文件目录保存到自己的私人文件夹中，以后需要查找文件时，只要打开该文件目录就能实现快速定位文件的目的了。由这种方法自动生成的文件目录，包括文件后缀名、文件名、文件大小等，整个目录看上去既简洁又明了，其中“[]”里的内容是没有展开的子文件夹名。借用DIR命令，集中输出文件目录

利用Excel从文件夹中提取所有文件名

Excel快速提取文件夹里所有文件名称

Excel快速提取文件夹里所有文件名称工作中经常会遇到资料录入的情况，比如一大堆文件，要用Excel表格分类并做登记，如下图上图中一堆的文件，名字没有任何规律，文件格式也不同，但是，我们却要求把文件名字和格式一起录入Excel中。看着这堆东西，头都大了，还要一个个的录入，录了名字不算，还要录入格式，谁来救救我！o(╥﹏╥)o

Excel能拯救你， Excel可以实现自动提取名称和格式，下面请看我表演操作步骤 1.在Excel的菜单栏里点选‘公式’项，然后点击‘定义名称’ 2.在弹出的窗口上填写一个自定义名称，这里我先填写‘文件名称’， 3.在引用位置填写=FILES("C:\Users\lzx66xxxx\Desktop\文件01\*.*")，其中‘C:\Users\lzx66xxxx\Desktop\文件01’是需要读取的文件所在的文件夹的地址，填写好后按确定

4.在表格中输入=INDEX(文件名称,ROW(A1))，然后按回车键，就会出现第一个文件的名称和格式了。（公式中的‘文件名称’是我们之前自定义的名称，A1是我们当前输入公式的单元格坐标） 5.选择第一个名称的单元格，然后将鼠标移动到右下角的小黑点上，将鼠标图标变成黑色十字

6.鼠标对着小黑色点时，按住鼠标左键不放，一直往下拉，就会显示我们需要提取的文件夹中所有文件的名称和格式了 7.当拖动公式时，如果出现以下符号，就代表文件夹里的文件已经全部提取，到这里就代表录入完毕了

同学们，如果我们有两个文件夹，我们想对比一下两个文件夹中有什么共同内容和不同内容时，怎么核对呢？用以上方法导入名称后，能不能通过Excel快速核对呢？答案肯定是：能的！！！那么具体怎么操作呢？下一篇文章分享方法，各位同学可以先关注公众号哦

自动提取文件名并建立连接的excel目录管理文件

本人是做人事的，需要把日常整理的一些文件和资料保存并查阅，但是由于文件格式太多，内容太复杂，所以存放方式如下：G盘hr目录下创建招聘培训考核薪酬劳动关系五个子目录，每个子目录里面又含有理论案例制度表格法律等5个小目录，里面分辨存放着相关文件，格式主要是word excel ppt 视频文件，有时还有个别小文件包存放一个整体系列的个别文件。[em07] [em07] 很复杂是不[em07] [em07] [em07] 所以创建的excel文件也是根据这样的存放分类的sheet1-sheet5分别是招聘培训考核薪酬劳动关系。每个表格A列理论B 列链接 c列案例D列链接E列制度F列链接。。。。首先是ACEGI 五列的文件名提取用图表函数files 提取文件名，函数如下1、filelist=files("G\hr\招聘\理论\*.*") 2、在a1单元格输入：=if(row()>counta(filelist),"",index(filelist,row())):loveliness: :lovelin ess: 通过这两个函数完成各个文件包的名字提取其次建立链接，用函数 HYPERLINK("G:\hr\招聘\制度\"&A,"链接") 完成文件的自动链接，并在B列显示“链接”，点“链接”时就能直接打开了这是利用我所查阅的一些资料计划的excel表格，但是由于这些资料跟着整理的变动会不停的变动，并且有时候在家和在公司两地整理，所以想把他拷入移动硬盘中这样就能随时整理了，但是

这样盘符就会根据各个电脑的分盘情况而变得不同，所以想请教一下各位高手还有没有其他的解决方法，请详细叙述一下，因为本人对函数和VB懂的很少。

批量提取文件名,批处理dir命令详解

1、打开任意一个文档，编辑命令：dir E:\我的电子书/b > E:\我的电子书\书名.txt，特别提醒："dir"后、"/b"前、后、">"前、后，都要有一个空格 2、在电脑”开始“菜单，右击，打开”运行“对话框，输入”cmd“，点”确定“，然后将上面的命令复制到程序对话框中，没有错误提示，即可。提示：粘贴命令时，只能用鼠标右键选择"粘贴"，不能用快捷键“ctrl+v”. 3、打开指定文件夹，查看结果，就会发现文件夹中多一个“书名”的文本文件。我们还可以把文件名导出成“.xls”文件，便于管理和编辑，只要简单修改一下命令中的文件后缀名，命令改为：dir E:\我的电子书/b > E:\我的电子书\书名.xls

批处理dir命令详解 dir /s /b /d d:\1.txt >2.txt 查找d盘根目录及子目录下的所有1.txt

并将其结果导入1.txt中 dir /s /b /d /s查找当前目录以及所有子目录下的文件 /b舍弃标题与摘要内容 /d 跟宽式相同，但文件是按栏分类列出的。 /n 长列表格式即竖立格式与光杆dir 下无异/b /a:d 指定显示所有具有该属性的文件 /b /d&/w 交互使用时，/d&/w 开关无效。 /q 显示文件所有权信息、或者说文件所有者信息/w 宽行格式显示X轴序列文件名过长无效 /d 宽行格式显示Y轴序列文件名过长无效/d & /w 会在在文件夹的前后添加"[]"X /l 所显示文件名，全部为小写英文字母。

/c&/-c 禁用文件大小显示千位数分隔符。默认显示分隔符“,” /-c 不显示分隔符。 /a:d 只显示文件夹(包括隐藏文件夹）/a:h 只显示隐藏文件(包括具有当前属性的其他三种文件、夹） /a:r 仅显示只读文件(包括具有当前属性的其他三种文件、夹）/a:s 仅显示系统文件(包括具有当前属性的其他三种文件、夹） /a:a 只显示存档文件- - X----- 只显示文件(包括具有存档属性的其他三种属性文件）这个命令对应/a:d 只显示文件夹。 windows中文件共有四种属性、分别为存档、只读、系统、隐藏 /O 用分类顺序列出文件。排列顺序N 按名称(字母顺序) S 按大小(从小到大) E 按扩展名(字母顺序) D 按日期/时间(从先到后) G 组目录优先- 反转顺序的前缀

利用Excel从文件夹中提取所有文件名

利用Excel从文件夹中提取所有文件名 [日期：2007-10-01] 来源：作者：[字体：大中小] 有时我们想要把一个文件夹中的所有文件名整理到一个文件中，便于管理和查询以及打印，多数是使用“复制”、“粘贴”方法(将文件夹中的文件重命名，在可编辑状态下进行复制，而后在其他文档中粘贴)。这种办法可行，但对于文件夹中有大量的文件的情况，则工作效率低，而且做完后必须核对。利用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)。

提取文件夹中所有TXT中所需信息并导入数据库

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> 提取数据 <% Set fso = Server.CreateObject("Scripting.FileSystemObject") on error resume next Set objFolder=fso.GetFolder("C:\Jerry\ASP\WEB\wwwroot\getdata") Set objFiles=objFolder.Files '循环输出文件夹path下的文件的文件名 For each objFile in objFiles '取相关值 txtname="" name1="" school="" sex="" qq="" msn="" telephone="" if objFile.Type="Text Document" then

Response.Write "
"+https://www.wendangku.net/doc/513256521.html, & "
" txtname=https://www.wendangku.net/doc/513256521.html, '判断是否有相同的文件名 Set rs2 = Server.CreateObject("ADODB.Recordset") sql="select * from dbo.data1 where txtname="&txtname rs2.Open sql,objConn,1,3 if rs2.eof=true then '读取文档 dim fso dim path set fso=server.createobject("scripting.filesystemobject") path = objFile.Path set file = fso.opentextfile(path,1,true) if not file.atendofstream then line=file.ReadAll end if '提取姓名 response.write ("姓名:") n=instr(line,"帐号 <#>") m=instr(line,"装扮主页修改资料") if m=0 then'提取物修改资料这块的账户姓名 line=right(line,len(line)-n-13) i=instr(line,"\x{")

VBA文件名提取代码

代码 Private Sub CommandButton1_Click() Dim strArr() Dim mypath, myfile As String Dim rCount, n, m, i, j, i1 As Integer '************************** mypath = ThisWorkbook.Path ActiveSheet.Hyperlinks.Add Anchor:=Range("a5"), Address:=mypath, TextToDisplay:="图纸存放路径：" & mypath '************************** rCount = 0 myfile = Dir(mypath & "\*.pdf") ReDim Preserve strArr(rCount) Do While myfile <> vbNullString strArr(rCount) = myfile rCount = rCount + 1 ReDim Preserve strArr(rCount) myfile = Dir$() Loop '************************** n = 16 Range("b16", "d200") = "" For i = LBound(strArr) To UBound(strArr) - 1 For j = 16 To UBound(strArr) + 16 If Range("b" & j) = "" Then Exit For If Left(strArr(i), 13) = Range("b" & j).Value Then GoTo jump Next j Range("b" & n).Value = Left(strArr(i), 13) Range("c" & n).Value = Mid(strArr(i), 17, 1) m = 0 For i1 = LBound(strArr) To UBound(strArr) If Left(strArr(i1), 13) = Left(strArr(i), 13) Then m = m + 1 Next i1 Range("d" & n).Value = m n = n + 1 n0 = n0 + m jump: Next i MsgBox "总共" & n0 & "页！", vbDefaultButton1, "提示" End Sub

java获取文件夹下所有文件的名称

如果想要获得当前文件中的文件名只需要String [] fileName = file.list();就可以了。如果要包括文件中的文件名就可以用递归的方式。下面是两个具体的实现。其中public static String [] getFileName(String path)是只得到当前文件中的文件名。public static void getAllFileName(String path,ArrayList fileName)是包括当前文件及其子文件的文件名。 public class GetFileName { public static String [] getFileName(String path) { File file = new File(path); String [] fileName = file.list(); return fileName; } public static void getAllFileName(String path,ArrayList fileName) { File file = new File(path); File [] files = file.listFiles(); String [] names = file.list(); if(names != null) fileName.addAll(Arrays.asList(names)); for(File a:files) { if(a.isDirectory()) { getAllFileName(a.getAbsolutePath(),fileName); } } } public static void main(String[] args) { String [] fileName = getFileName("F:\\xiaoshuo"); for(String name:fileName) { System.out.println(name); } System.out.println("--------------------------------"); ArrayList listFileName = new ArrayList();

用Excel从文件夹中提取所有文件名

用Excel从文件夹中提取所有文件名 1.把一个文件夹中的所有文件名整理到一个文件中，便于管理和查询以及打印，多数是使用“复制”、“粘贴”方法(将文件夹中的文件重命名，在可编辑状态下进行复制，而后在其他文档中粘贴)。这种办法可行，但对于文件夹中有大量的文件的情况，则工作效率低，而且做完后必须核对。 2.利用DOS的重定向命令“〉”加Excel的引用外部数据功能可实现方便快捷的方法(关于DOS中的重定向“〉”。假设我们要提取C盘下的Windows目录下的所有文件及文件夹名。第1步在DOS或Windows 98的MS-DOS方式下，输入如下命令：C:＼windows＼dir〉d:＼1.txt(回车) 第2步打开一个新的Excel XP电子表格，单击工具栏中的“数据”下拉菜单，选择“导入外部数据→导入数据”命令，打开“导入数据”对话框，在“查找范围”中找到D盘下的1.txt文档，单击“打开”，进入“文本导入向导-3步骤之1”。第3步在“原始数据类型”单选框中选“分隔符号”后按“下一步”，进入“文本导入向导-3步骤之2”。第4步在“分隔符号”复选框中选“分号、逗号、空格、其他”，并在“其他”后的空格中填“.”，按“下一步”，进入“文本导入向导-3步骤之3”。第5步单击“完成”，出现“导入数据”对话框，选择“现有工作表”单选框后按“确定”。 3.到了这里，你应可以看到8列数据，第一列便是所要的“文件名”。但是，DIR命令的显示的中文文件名只显示3～4个汉字，别急，看看第7列(G列)，所有的完整的文件名都在这里！第8列是文件名的后缀，方便于筛选(对于Excel 2000，所不同的是在工具栏中的“数据”下拉菜单下，选择的是“获取外部数据/导入文本文件”命令)。

快速批量提取文件夹中次级文件夹及文件名称的技巧

关键词：批量提取文件夹文件cmd tree dir 列表想对某个文件夹做个内容列表，把文件名字一个个复制，再粘贴到文本文档——太麻烦了！怎么办？技巧：首先调出MS-DOS窗：win+R ->cmd ->回车。方法一：tree命令命令提示符下：tree (要获得文件名的文件夹的路径）/f>（列表文件存放的路径及文件名/filename）注意：“/f>”前面的空格不可少！例如：要获得D盘下的所有文件的文件名，并将生成的文件保存到D盘，文件名为123.txt。可使用如下命令tree D: /f>D:/123.txt 方法二：dir命令 dir c:\ >d:\123.txt 将C盘根目录里的文件夹名和文件名都保存在D盘目录下的123.txt里。此文件可导入excel作进一步处理。dir可加参数/w 等。也可以先在命令提示符下进入某文件夹，然后输入：dir>> list.txt，回车，目录列表就到list.txt这个文件里了。小提示：可以先在记事本中写好，将其粘贴(注意：不能用Ctrl+V)到cmd.exe程序中。

例：将下列复制到cmd.exe中即可 tree D: /f>D:/123.xls tree命令和dir命令的区别： 1、tree能够以字符画的样式清晰的表明所有次级文件夹和文件（包括次级文件夹中的文件）的名称、存储位置隶属关系，而dir只能列出二级子文件夹的名称和根目录下文件的名称； 2、dir能显示各二级子文件夹和根目录下文件的最后修改时间（从年到分钟），tree不能； 3、dir能分类统计二级子文件夹和根目录下文件各自的个数及总体积（单位：字节），tree不能； 4、tree生成的列表文件体积比dir生成的大（由第1条区别也可猜出这一点）。其他：若是音乐文件，可将音乐文件拖进千千静听等播放软件，然后另存为播放列表。此列表用记事本打开即可查看。

用bat批量获取和修改文件名的方法

文本预览：用bat批量获取和修改文件名的方法 1.批量提取新建文本文档在文本文档里输入： dir *.* /a /b /s >1.txt 保存为提取名字.bat 文件名字被提取到当前文件夹的1.txt里面了！也可以提取某类型的文件比如*.mp3 或者a*.mp3 2.批量重命名新建文本文档在文本文档里输入： @for /f %%a in (A.txt) do @( if exist %%a for /f %%b in (B.txt) do ( rename %%a %%b)) 保存为批量改名.bat A.txt 是原来的文件名 B.txt 是修改后的文件名一行对应一个名字不能有空格同时注意文件属性 a.txt : NBA直播录像1.3gp NBA直播录像2.3gp b.txt : NBA直播录像第一场.3gp NBA直播录像第二场.3gp 参数： -1 每列仅显示一个文件或目录名称。 -a或--all 下所有文件和目录。 -A或--almost-all 显示所有文件和目录，但不显示现行目录和上层目录。 -b或--escape 显示脱离字符。 -B或--ignore-backups 忽略备份文件和目录。 -c 以更改时间排序，显示文件和目录。 -C 以又上至下，从左到右的直行方式显示文件和目录名称。 -d或--directory 显示目录名称而非其内容。 -D或--dired 用Emacs的模式产生文件和目录列表。 -f 此参数的效果和同时指定"aU"参数相同，并关闭"lst"参数的效果。 -F或--classify 在执行文件，目录，Socket，符号连接，管道名称后面，各自加上"*","/","=","@","|"号。-g 次参数将忽略不予处理。 -G或--no-group 不显示群组名称。 -h或--human-readable 用"K","M","G"来显示文件和目录的大小。 -H或--si 此参数的效果和指定"-h"参数类似，但计算单位是1000Bytes而非1024Bytes。 -i或--inode 显示文件和目录的inode编号。 -I<范本样式>或--ignore=<范本样式> 不显示符合范本样式的文件或目录名称。 -k或--kilobytes 此参数的效果和指定"block-size=1024"参数相同。

用批处理命令批量获取指定文件夹内的文件名

用批处理命令批量获取指定文件夹内的文件名在需要提取文件名的文件夹内新建一个文本文件，输入内容： dir /s /w >>catalog.txt 保存后将其文件后缀.txt改为.bat，然后运行之，该文件夹下会自动产生一个catalog.txt的文本文件，其中就包含了当前文件夹的所有文件名列表。这个bat文件可以挪到任何文件夹下进行运行。参数解读：如果为dir*.doc/s /w >>catalog.txt，表示仅生成后缀为.doc的文件，如果是*.*，那就表明包含所有文件，因此也可以省略不写（如最上面提到的范例）。 /s 表示只显示系统文件； /w 表示只显示文件名，至于文件大小及建立的日期和时间则都省略； -------------------------------------------------------------------------------- 更多参考：DIR 命令的格式 dir [D:][PATH][NAME][[/A][:attrib]][/o:[sorted][/s][/l][/c[h] (1)dir /a:attrib 缺省包含所有文件(系统文件.隐含文件) attrib[:][h/-h]只显示隐含文件或非隐含文件. [r/-r]只显示只读文件或非只读文件 [s/-s]只显示系统文件或非系统文件 [a/-a]只显示要归档文件或非归档文件 (2)/o[:]sorted:缺省完全按字母顺序,子目录显示在文件之前 /o[n/-n]:按字母顺序或按文件名顺序/反向显示 [e/-e]:按扩展名字母顺序/反向显示 [d/-d]:按时间顺序/反向显示 [s/-s]:按大小从大到小或/反向显示 [g/-g]:按子目录先于文件或文件先于子目录 (3)/s 参数:对当前目录及其子目录中所有文件进行列表 (4)/B 参数:将只显示文件名与扩展名 (5)/L 参数:将全部用小写字母对文件或子目录进行列表如何快速获取当前目录下的xls文件清单 1，新建一txt文件，输入如下代码： For /r %%i in (*.xls) DO @echo %%~fi >>Excel文件名.txt 其中粗体部分为执行批处理后新生成的存放xls文件名清单的txt文件 2，存盘后更改扩展名txt为bat 3，执行bat文件，就生成了txt格式的文件名清单 4，附件为可执行bat文件批处理自身%0 的总结。批处理运用中，经常要对自身进行操作，如：提取路径，文件名，后缀名，大小，等等。。。。充分利用%0的扩展功能，可以很方便的实现。 :: code by 随风@https://www.wendangku.net/doc/513256521.html, 2008/01/08

批量获取文件名

有时我们想要把一个文件夹中的所有文件名整理到一个文件中，便于管理和查询以及打印，多数是使用“复制”、“粘贴”方法（将文件夹中的文件重命名，在可编辑状态下进行复制，而后在其他文档中粘贴）。这种办法可行，但对于文件夹中有大量的文件的情况，则工作效率低，而且做完后必须核对。利用DOS的重定向命令“〉”加Excel的引用外部数据功能可方便快捷的实现。假设我们要提取C盘下的Windows目录下的所有文件及文件夹名。第1步：在DOS或Windows 98的MS-DOS方式下，输入如下命令：C:\windows\dir〉d:\1.txt(回车) 第2步：打开一个新的Excel XP电子表格，单击工具栏中的“数据”下拉菜单，选择“导入外部数据→导入数据”命令，打开“导入数据”对话框，在“查找范围”中找到D 盘下的1.txt文档，单击“打开”，进入“文本导入向导-3步骤之1”。第3步：在“原始数据类型”单选框中选“分隔符号”后按“下一步”，进入“文本导入向导-3步骤之2”。第4步：在“分隔符号”复选框中选“分号、逗号、空格、其他”，并在“其他”后的空格中填“.”，按“下一步”，进入“文本导入向导-3步骤之3”。第5步：单击“完成”，出现“导入数据”对话框，选择“现有工作表”单选框后按“确定”。到了这里，你应可以看到8列数据，第一列便是所要的“文件名”。但是，DIR命令的显示的中文文件名只显示3～

4个汉字，别急，看看第7列（G列），所有的完整的文件名都在这里（如图4）！第8列是文件名的后缀，方便于筛选（对于Excel 2000，所不同的是在工具栏中的“数据”下拉菜单下，选择的是“获取外部数据/导入文本文件”命令）。至此，你就可以用Excel来编辑这些文件名了。说简单点就是：命令提示符下： (开始/运行/CMD) tree (要获得文件名的文件夹的路径）/f >（存放的路径 /filename）例如：要获得C盘下的所有文件的文件名，并将生成的文件保存到D盘，可使用如下命令: tree C: /f >D:/contents.txt （注意空格） --------------------------------------------------------------------------------- 把音乐里面的文件名字都给提取出来用Winamp,然后选择保存清单为Html就行了要用Dos命令的话，就用这个在DOS提示符下，在中文目录所在盘符(比如C盘） dir/w c:\*.* >1.TXT 这个命令的作用就是把C盘根目录里的文件和文件名都保存为1.txt了

文件名提取方法

快速批量提取文件夹中次级文件夹及文件名称的技巧 2012-03-24 09:21:13| 分类：信息技术|字号订阅关键词：批量提取文件夹文件cmd tree dir 列表想对某个文件夹做个内容列表，把文件名字一个个复制，再粘贴到文本文档——太麻烦了！怎么办？技巧：首先调出MS-DOS窗：win+R ->cmd ->回车。方法一：tree命令命令提示符下：tree (要获得文件名的文件夹的路径）/f>（列表文件存放的路径及文件名/filename）注意：“/f>”前面的空格不可少！例如：要获得D盘下的所有文件的文件名，并将生成的文件保存到D盘，文件名为123.txt。可使用如下命令 tree D: /f>D:/123.txt 例如提取： F盘下面的两个归档文件件里所有的文件名称和层次结构。

方法二：dir命令 dir c:\ >d:\123.txt 将C盘根目录里的文件夹名和文件名都保存在D盘目录下的123.txt里。此文件可导入excel作进一步处理。dir可加参数/w 等。（加下划线的这条是原作者[1]写的，我还没试过……）也可以先在命令提示符下进入某文件夹，然后输入： dir >> list.txt 回车，目录列表就到list.txt这个文件里了。小提示：可以先在记事本中写好，将其粘贴(注意：不能用Ctrl+V)到cmd.exe程序中。例：将下列复制到cmd.exe中即可 tree D: /f>D:/123.xls tree命令和dir命令的区别： 1、tree能够以字符画的样式清晰的表明所有次级文件夹和文件（包括次级文件夹中的文件）的名称、存储位置隶属关系，而dir只能列出二级子文件夹的名称和根目录下文件的名称； 2、dir能显示各二级子文件夹和根目录下文件的最后修改时间（从年到分钟），tree不能； 3、dir能分类统计二级子文件夹和根目录下文件各自的个数及总体积（单位：字节），tree不能；

使用VBA提取文件夹内所有word文档中的表格数据

使用VBA提取word文档中的表格数据新建一个excel文档，在VBA编辑界面操作添加用户界面： UserForml [■ ' ...... p ... ' ■ ' ■ ■ ' 日B 「文件挪径： ■■ I !l ■ r l ■ I ?I M I 1 ■< 'I 开始代码： Private Sub Comma ndButto n1_Click() Dim s As Stri ng s = TextBox2.Text Dim fs, myfolder, myfile, myfiles, wdapp, mydoc Dim mTable As Table, mCell As Cell Set fs = CreateObject("Scriptin g.FileSystemObject") Set myfolder = fs.GetFolder(s) Set myfiles = myfolder.Files Dim m, n As In teger m = 0 n = 1 For Each myfile In myfiles m = m + 1 Set wdapp = CreateObject("word.applicati on") wdapp.Docume nts.Ope n myfile .P ath 'wdapp.Visible = False wdapp.Visible = True Set mydoc = wdapp.Docume nts.l tem(https://www.wendangku.net/doc/513256521.html,) For Each mTable In mydoc.Tables For Each mCell In mTable.Ra nge.Cells ThisWorkbook.ActiveSheet.Cells(m, n) = Left(mCell.Ra nge.Text, Le n(mCell.Ra nge.Text)- n = n + 1 Next mCell Next mTable Set mydoc = Noth ing wdapp.Quit

TotalCmd快速提取文件名和Excel批量修改文件名

创意申请人：万文辉品牌部张鋆市场Email 创意名： TotalCmd快速提取文件名+Excel批量修改文件名优势：可以批量修改多个文件名，节省大量人工成本，也便于后期统一修改。创意内容： 1.TotalCmd快速提取文件名 ①下载安装Total Commander（该软件功能强大，一般的文件操作，如搜索、复制、移动、改名、删除等功能应有尽有，更有文件内容比较、同步文件夹、批量重命名文件、分割合并文件等实用功能。）。 ②打开Total Commander，全选“我的电脑”相应文件夹得所有文件

③选择“编辑”下面的“复制仅文件名”命令 ④新建Excel表，粘贴刚复制的内容。 2.Excel批量修改文件名（以批量修改照片名为例）第1分钟：准备照片。事前按照学籍顺序将学生排好序列，然后逐一拍照，完成后将相片文件拷到电脑上备用，如存放在“D：\photo”文件夹内。第2-3分钟：巧用EXCEL填充柄，批量建立改名命令行。

第一步：打开EXCEL软件。在A列中输入照片名“DSCN0001．JPG”，然后用填充柄向下拖动，一直到合适的数字为止。然后，在B列中以学生的学号等信息输入“13118120100001．JPG”并用填充柄向下拖动直到合适的位置停止。第二步：在C列中输入以下内容“="REN "&A1&""&B1&""”（注意：外侧双引号不用输入，内部双引号必需是在英文状态下输入）后按下回车键，即可出现相应结果。小贴士：这里的REN其实就是DOS中的重命名命令，本例中这句命令的意思是将A列中的名字重命名为B列中对应的名字，这条命令在EXCEL中无法使用，仅用来以备后用。第三步：向下拖动该单元格的填充柄，直至对应左侧的内容。最终效果如图所示。最后将C列中的全部内容选中并进行复制。 ●这是利用EXCEL填充句柄批量生成的重命名命令。第4分钟：建立“重命名”批处理命令。在D：\photo文件夹下单击鼠标右键，选择新建“文本文档”命令。然后将该文件名改为“重命名．BAT”。右击该文件，选择“编辑”命令，进入该批处理文件的编辑状态。在编辑空白区右击，选择“粘贴”，将刚才EXCEL文件中C列中的内容复制到这里。然后存盘并退出。第5分钟：运行“重命名．BAT”进行批量更名。回到“D：\photo”文件夹后，直接双击运行“重命名．BAT”。这时，你会发现所有的相片文件名都已经整整齐齐地更改为我们需要的文件名了。