导读：就爱阅读网友为您分享以下“如何将文件夹里的多个文件名一下子都复制到excel的表格中”资讯，希望对您有所帮助，感谢您对92to.com的支持!如何将文件夹里的多个文件名一下子都复制到excel的表格中 方法11、打开Word文档——刷选多个文件名——右键——拉至Word中——选“在此创建超链接”；2、全选——Ctrl+Shift+F9——（删除超链接）；3、Ctrl+H——查找内容：输入一个空格和文件所在路径（如D:\My Documents\AAA\）——替换为——输入 ^p ——全部替换；4、复制——粘贴到Excel中方法2比如你的目录为D:\工资打开附件下的Dos命令提示符输入 d:
回车输入 cd\工资
回车输入 dir&a.txt好了，在D:\工资 目录下已经生成了一个a.txt的文本文件，双击打开，全选复制，在Excel中粘贴，分列，留下你需要的列就可以了。 注：上面的“回车”上让你打回车键百度搜索“就爱阅读”,专业资料,生活学习,尽在就爱阅读网92to.com,您的在线图书馆
欢迎转载：
推荐： 　　　如何批量将一个文件同时复制进多个文件夹_百度知道
如何批量将一个文件同时复制进多个文件夹
我有更好的答案
不严格来讲，貌似可以。如果批处理是类似这样的：copy c:\xxx d:\xxxcopy c:\xxx e:\xxx（我一般使用 Robocopy.exe，比copy 和 xcopy都强大安全）因为磁盘和系统有缓冲，所以这样读一次，可以同时复制到其他多个磁盘。我试验过的。有时一个复制命令较早，一个较晚，不久它们就同步了(复制文件的进度完全一致)。
怎么使用Robocopy.exe呢
采纳率：80%
来自团队：
为您推荐：
其他类似问题
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。1.原始数据所在工作簿包含多个格式相同的工作表，只不过每个工作表内容不同，比如说不同人名的工作表数据或者不同部门填写的数据。
2.在原始数据同目录下新建一个工作簿，建立两个工作表，名称分别为“首页”和“合并汇总表”。
3.按Alt+F11进入VBA代码编辑和调试界面。
4.根据下图提示，插入一个模块。
5.将下述代码粘贴到模块空白处：
Sub CombineSheetsCells()
Dim wsNewWorksheet As Worksheet
Dim cel As Range
Dim DataSource, RowTitle, ColumnTitle, SourceDataRows, SourceDataColumns As Variant
Dim TitleRow, TitleColumn As Range
Dim Num As Integer
Dim DataRows As Long
DataRows = 1
Dim TitleArr()
Dim Choice
Dim MyName$, MyFileName$, ActiveSheetName$, AddressAll$, AddressRow$, AddressColumn$, FileDir$, DataSheet$, myDelimiter$
Application.DisplayAlerts = False
Worksheets("合并汇总表").Delete
Set wsNewWorksheet = Worksheets.Add(, after:=Worksheets(Worksheets.Count))
wsNewWorksheet.Name = "合并汇总表"
MyFileName = Application.GetOpenFilename("Excel工作薄 (*.xls*),*.xls*")
If MyFileName = "False" Then
MsgBox "没有选择文件！请重新选择一个被合并文件！", vbInformation, "取消"
Workbooks.Open Filename:=MyFileName
Num = ActiveWorkbook.Sheets.Count
MyName = ActiveWorkbook.Name
Set DataSource = Application.InputBox(prompt:="请选择要合并的数据区域：", Type:=8)
AddressAll = DataSource.Address
ActiveWorkbook.ActiveSheet.Range(AddressAll).Select
SourceDataRows = Selection.Rows.Count
SourceDataColumns = Selection.Columns.Count
Application.ScreenUpdating = False
Application.EnableEvents = False
For i = 1 To Num
ActiveWorkbook.Sheets(i).Activate
ActiveWorkbook.Sheets(i).Range(AddressAll).Select
Selection.Copy
ActiveSheetName = ActiveWorkbook.ActiveSheet.Name
Workbooks(ThisWorkbook.Name).Activate
ActiveWorkbook.Sheets("合并汇总表").Select
ActiveWorkbook.Sheets("合并汇总表").Range("A" & DataRows).Value = ActiveSheetName
ActiveWorkbook.Sheets("合并汇总表").Range(Cells(DataRows, 2), Cells(DataRows, 2)).Select
Selection.PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
DataRows = DataRows + SourceDataRows
Workbooks(MyName).Activate
Application.ScreenUpdating = True
Application.EnableEvents = True
Workbooks(MyName).Close
6.在“首页”工作表中按下图示范插入一个窗体控件并指定宏为插入的代码名称。
7.点击“首页”工作表中插入的按钮，根据提示，浏览到原始数据工作簿。
8.下一步，用鼠标选择要合并的数据范围。
注意：每个工作表数据可能不一样，比如说有的是10行数据，有的是30行数据。在这里可以用鼠标选择任意工作表的一个较大范围，比如说A1:D100，保证比最多行数的工作表数据还多就可以，一会再删除空行。
9.点击确定按钮，待代码运行完毕后，所有的数据就都合并到了“合并汇总表”中。
1）A列的文本说明右侧的数据来自于原始数据表的哪个工作表；
2）数据之间会有一些空行，下面通过筛选删除。
10.选中全部数据区域，执行自动筛选。然后选择其中一个字段，选择“空白”和标题内容。
11.然后将筛选出来的无用行鼠标右键删除，再删除A列整列即可如何将一个文件复制到多个文件夹(有上百个)_百度知道
如何将一个文件复制到多个文件夹(有上百个)
我有更好的答案
先把要复制的那个文件复制粘贴到要复制到的那些文件夹的外面，然后全选所有要复制到的文件夹，按住Ctrl，把要复制的那个文件拖动，就可以直接复制到那些文件夹里。
采纳率：55%
用这个软件。上面选择文件。下面选择文件夹。再点击复制即可。
为您推荐：
其他类似问题
文件夹的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。&nbsp>&nbsp
&nbsp>&nbsp
&nbsp>&nbsp
将一个文件拷贝到另一个文件夹中
摘要：importjava.io.BufferedInputSimportjava.io.BufferedOutputSimportjava.io.Fimportjava.io.FileInputSimportjava.io.FileNotFoundEimportjava.io.FileOutputSimportjava.io.IOEimportjava.io.InputSimp
import java.io.BufferedInputSimport java.io.BufferedOutputSimport java.io.Fimport java.io.FileInputSimport java.io.FileNotFoundEimport java.io.FileOutputSimport java.io.IOEimport java.io.InputSimport java.io.OutputSimport java.util.ArrayLimport java.util.Lpublic class FileCopy {public void copy(String src, String dest) {InputStream is =OutputStream os =char ch[] = src.toCharArray();// ************新添加的代码,获取文件名**********int pos = 0;for (int i = ch.length - 1; i &= 0; i--) {if (ch[i] == '//') {if (i & pos)pos =}}String temp = src.substring(pos);dest = dest +System.out.println(&dest=& + dest);try {is = new BufferedInputStream(new FileInputStream(src));os = new BufferedOutputStream(new FileOutputStream(dest));byte[] b = new byte[1024];int len = 0;String str =try {while ((len = is.read(b)) != -1) {os.write(b, 0, len);}os.flush();} catch (IOException e) {// TODO Auto-generated catch blocke.printStackTrace();} finally {if (is != null) {try {is.close();} catch (IOException e) {// TODO Auto-generated catch blocke.printStackTrace();}}}} catch (FileNotFoundException e) {e.printStackTrace();} finally {if (os != null) {try {os.close();} catch (IOException e) {e.printStackTrace();}}}}public static void main(String[] args) {FileCopy test = new FileCopy();test.copy(&F://mirror//api.postalmethods.com//PostalWSWSDL.asmx&, &D://WSDL&);}}
以上是的内容，更多
的内容，请您使用右上方搜索功能获取相关信息。
若你要投稿、删除文章请联系邮箱：zixun-group@service.aliyun.com,工作人员会在五个工作日内给你回复。
云服务器 ECS
可弹性伸缩、安全稳定、简单易用
&40.8元/月起
预测未发生的攻击
&24元/月起
为您提供0门槛上云实践机会
你可能还喜欢
你可能感兴趣
阿里云教程中心为您免费提供
将一个文件拷贝到另一个文件夹中相关信息，包括
的信息，所有将一个文件拷贝到另一个文件夹中相关内容均不代表阿里云的意见！投稿删除文章请联系邮箱：zixun-group@service.aliyun.com，工作人员会在五个工作日内答复
售前咨询热线
支持与服务
资源和社区
关注阿里云
International