Excel用公式函数提取文件名

1.点开始菜单，就能看到上面的界面，选择“运行”！你点了运行程序后，在里面输入“cmd”点击确定会进入命令提示符串口

2.打个比方说，文件在C盘里面的111文件夹，要读取里面的文件的文件名字

3.利用cd命令到达要读取文件名的文件夹，用法是这样的：命令为“cd c:\111”

4.然后会看到下面的这个情况：

5.然后输入命令“dir /b>d:1.xls”然后回车

6.到D盘就能看到一个名称为1.xls的文件

7.打开就是了

　　1、Mid函数MID(text, start_num, num_chars) text 文本or 文本位置 start_num 启始数字，num_chars 结束数字
　　使用格式：MID(text,start_num,num_chars)
　　参数说明：text代表一个文本字符串；start_num表示指定的起始位置；num_chars表示要截取的数目。
　　应用举例：假定A47单元格中保存了“我喜欢天极网”的字符串，我们在C47单元格中输入公式：=MID(A47,4,3)，确认后即显示出“天极网”的字符。

　　SEARCH函数
　　功能：用来返回指定的字符串在原始字符串中首次出现的位置 ,从左到右查找，忽略英文字母的大小写。
　　使用格式：SEARCH（find_text，within_text，start_num）
　　find_text：要查找的文本字符串
　　within_text：要在哪一个字符串查找
　　start_num：从within_text的第几个字符开始查找。
　　注意：在find_text中，可以使用通配符，例如：问号“？”和星号“*”。其中问号“？”代表任何一个字符，而星号“*”可代表任何字符串。如果要查找的字符串就是问号或星号，则必须在这两个符号前加上“～”符号。
　　

　　2、返回当前工作表的名称：=MID(CELL("filename"),SEARCH("]",CELL("filename"))+1,LEN(CELL("filename"))-SEARCH("]",CELL("filename")))
　　C:\Users\DA\Desktop\[B8035M-A0.00.001.xlsx]Sheet1
　　3、仅插入当前文件名：=MID(CELL("filename"),SEARCH("[",CELL("filename"))+1, SEARCH("]",CELL("filename"))-SEARCH("[",CELL("filename"))-1)
　　仅插入当前工作表明：
　　=RIGHT(CELL("filename"),LEN(CELL("filename"))-FIND("]",CELL("filename")))

一 使用DOS命令，开始——系统工具——命令提示符，然后输入以下命令：
dir e:\data\* > e:\book1.txt
提取e:\data\目录下所有文件名到e:\book1.txt

二 然后打开e:\book1.txt，将文本复制到Excel中。

截图看一下

用VBA轻松搞定，我等下贴代码给你