提取文件名到excel表格中公式

⑴ 怎么把一个文件夹里的文件名导入excel

怎么把一个文件夹里的文件名导入excel 在资源管理器中进入该文件夹，右击，右键菜单中选择“新建”——再选择“Microsoft Excel工作簿”，就会创建一个新的空白Excel工作簿文件，将其重命名一个文件名，如“文件目录.xlsx"，双击打开。
在工作簿中，定义一个名称，如FilesName，引用中输入：
=FILES("文件夹路径\*.*")&T(NOW())
确定，关闭名称管理。其中文件夹路径可以通过在资源管理器中按Shift加鼠标右键，选择”复制为路径“快速准确都得到，再在定义名称时粘贴即可。
在A1中输入公式：
=IFERROR(INDEX(FilesName,ROW(A1)),"")
下拉至出现空白单元格时，就得到该文件夹下所有文件名列表
也可以A1中输入公式：
=IFERROR(HYPERLINK("文件夹路径\"&INDEX(FilesName,ROW(A1)),INDEX(FilesName,ROW(A1))),"")
下拉到出现空白，不仅得到文件名列表，而且还建立了超级链接，点击文件名，会根据文件类型关联的应用程序自动打开文件。可根据需要自己选择哪种方式。
PS：名称定义时，*.*可根据需要把后面的*改为想只列出的某类文件，如只要列出Excel文件，就是*.xls*，或包含某个（某些）特定字符的文件，如“2016年*.*”则列出以“2016年”开头的文件名。
名称的中NOW()起刷新作用，即当文件夹中的文件发生了变化时，能在打开文件目录这个工作簿时自动刷新。
测试和打字花了半个小时，追加悬赏分吧。
如用DOS命令在文件夹里,把此文件夹里的文件名全部导入到一个TXT文本文档里?
dir >>a.txt
怎样将一个文件夹里许多子文件夹里的图片都导入到一个文件夹里？
里面有个搜索，搜索图片格式，如.GIF，搜出后括起来剪贴就行啦（必须在该文件夹里面搜索，不可以在子文件夹里面使用）给分哦
请问怎么用matlab把一个文件夹里的文件按照文件名归类复制到不同的文件夹里？

pth = 'd:\tem\'; % 路径fns = '*.bmp'; % 扩展名 % fdt = dir([pth fns]); % 调入此路径下的指定扩展名文件for k = 1:length(fdt) fn = fdt(k).name; if ~isdir(fn) % 检验是否目录，是目录跳过 dd = fn(1); % 文件名的第一个字符作为目录名 if isempty(dir([pth dd])) % 检验目录是否建立 mkdir([pth dd]); % 建立目录 end ofn = [pth fn]; % 源文件全路径名 nfn = [pth dd '\' fn]; % 目标文件全路径名 file(ofn,nfn); % 拷贝文件 delete(ofn); % 删除源文件 endend

如何把一个文件夹里的文件剪切到另一个文件夹里
可以通过复制粘贴的方法转移文件的路径。更巧妙的方法就是用鼠标左键点住文件，然后拖动到新的文件夹图标处，等到这个新文件夹图标改变颜色以后，松开鼠标，文件就被转移到新的文件夹内了。
如何把一个文件夹里的文件名提取出来
打开文件夹，找到要复制的文件，这文件上鼠标右键重命名，文件名呈蓝色，鼠标在上面右键复制。
如何将多个文件夹下的文件名导入excel
dir历遍
Sub 取工作簿名到单元格()
Dim mypath$, myfile$, i As Long, j As Long, wb As Workbook
Application.ScreenUpdating = False
mypath = "F:\A股日数据\A股" '路径
myfile = Dir(mypath & "\*.xls")
ThisWorkbook.Sheets(1).Range("a:b").Clear
Columns("A:A").Select 'A列选择
Selection.NumberFormatLocal = "@" 'A列格式设置为文本
Do While myfile <> ""
If myfile <> ThisWorkbook.Name Then
Set wb = Workbooks.Open(mypath & "\" & myfile)
ThisWorkbook.Sheets(1).Cells(i + 2, 1) = Left(wb.Sheets(1).Range("a1"), 6)
ThisWorkbook.Sheets(1).Cells(i + 2, 2) = Mid(wb.Sheets(1).Range("a1"), 8, 4)
End If
myfile = Dir
i = i + 1
wb.Close False
Loop
Application.ScreenUpdating = True
End Sub
我也新手 自己做的给你个参考
怎么把一个文件夹里的东西拷贝到另一个文件夹里
打开A文件夹选中你要拷的东西右击鼠标选复制，然后打B文件夹右击鼠标选粘贴就OK了
怎样将文件夹里的文件详细信息导入EXCEL
打开DOS,运行一下dir命令,右键->标志,选择内容,按键Ctrl+C,在Excel中粘贴

⑵ 批量更改文件名，并提取至EXCEL

如下两种方法可供选择：bat批量处理和VBA。

1、BAT批处理文件

A. 获取文件名

选定部分或全选所有文件 > Shift+右键 > 复制为路径 > 粘贴到Excel

B. 编辑命令符

l 替换文件名前的路径（全部替换）

l 生成如下字符（空格不可缺少）： REN_原文件名_新文件名

可以使用EXCEL公式批量处理：

例如如下公式可将文件名前增加序列号1,2,3等。

=CONCATENATE("REN","",A1," ",ROW(A1),A1)生成批处理文件

C. 批处理

l 文件夹内新建txt文件

l 复制所有excel中编辑好的字符到txt文件中

l 文件扩展名更改为bat，运行。

2、VBA法

alt+F11,复制如下代码到代码栏，F5运行

SubRename_()
Dimmy_Path,my_DocAsString

WithApplication.FileDialog(msoFileDialogFolderPicker)'定位文件夹
.Show
.AllowMultiSelect=False
my_Path=.SelectedItems(1)
EndWith

DimiAsSingle
i=1
my_Doc=Dir(my_Path&""&"*")'遍历所有文件
DoWhileLen(my_Doc)<>0
Namemy_Path&""&my_DocAsmy_Path&""&i&my_Doc'更名：增加序号
i=i+1
my_Doc=Dir
Loop

my_Doc=Dir(my_Path&""&"*")
i=1
DoWhileLen(my_Doc)<>0'复制到excel
Cells(i,1)=my_Doc
i=i+1
my_Doc=Dir
Loop

EndSub

⑶ 如何取出excel中的工作表名和工作薄名

Excel中可以利用抄workbook函数提取袭工作表名和工作簿名。

软件版本：Office2007

方法如下：

1.点击公式菜单中的“名称管理器”：