文件夹怎么放到excel表格中

1.怎么把一大堆文件夹名称转到excel表里

1、打开文件夹，然后复制文件夹路径。

2、复制文件夹路径后，打开浏览器，把路径粘贴到浏览器网址中。

3、回车就可以在浏览器中打开文件夹，选中文件夹名称复制。

4、然后打开Excel表格，点击鼠标右键选择粘贴。

5、点击粘贴后，就可以把文件名都转到Excel中了。

2.如何将文件夹的名字导入到Excel表格中

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

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

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

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

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

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

7.打开就是了。

3.将一个文件夹里所有excel导入一个excel里

亲，将要汇总的文件放到一个单独专门的文件夹中。

在此文件夹中新建或打开一个Excel文件作为汇总文件，找一个空白Sheet或者新建一个Sheet存放汇总数据。然后按“Alt+F11”打开VBA编辑窗口，然后在左侧对应的Sheet上双击，右侧空白处粘贴下面的代码。

关闭VBA窗口。然后按“Alt+F8”打开宏窗口，选择刚插入的宏，点击“执行”。

Sub hz()Dim bt, r, c, n, first As Longbt = 1 '这里设置标题行有几行Dim f, ff As ObjectSet fso = CreateObject("Scripting.FileSystemObject")Set ff = fso.getfolder(ThisWorkbook.Path & "\")For Each f In ff.Files If f.Name <> ThisWorkbook.Name And Left(f.Name, 2) <> "~$" Then Workbooks.Open f.Name With Workbooks(f.Name).ActiveSheet If first = 0 Then c = .Cells(1, Columns.Count).End(xlToLeft).Column .Range("A1").Resize(bt, c).Copy ThisWorkbook.ActiveSheet.Range("A1") n = bt + 1: first = 1 End If r = .Cells(Rows.Count, "A").End(xlUp).Row .Range("A" & bt + 1).Resize(r - bt, c).Copy ThisWorkbook.ActiveSheet.Range("A" & n) n = n + r - bt End With Workbooks(f.Name).Close False End IfNext fSet fso = NothingEnd Sub。