作者:乔山办公网日期:
返回目录:excel表格制作
2分钟的事。可以批处理全自动,也可以dir命令配合excel半自动。也可以找工具软件自动处理。
用宏的zd办法:
Sub 列出同目录的文件()
'需要内先保存表格,目录文容件的数据将写到A列
Dim strFile As String, I As Integer
strFile = Dir(ActiveWorkbook.Path & "\*")
I = 2
While Len(strFile) > 1
Cells(I, 1) = strFile: I = I + 1
strFile = Dir
Wend
End Sub
比如你的目录为D:\工资
打开附件下的Dos命令提示符来
输入 d: 回车
输入 cd\工资自 回车
输入 dir>a.txt
好了,在D:\工资 目录下已经生成了一个a.txt的文本文件,双击打开,全选复制,在Excel中粘贴,分列百,留下你需要的列就可以了。
注:上面的“回车”上度让你打回车键
1、首先打开保存有EXCEL文件的文件夹——接着在地址栏那里选择文件夹路百径并右击选择复制。
2、打开任一浏览器——把复制的文件夹地址粘贴到搜索地址栏——按下回车就会出现所有文件名了。
3、全部选择文件名的内容并复制—度—打开新建空白EXCEL文档——点击选择A1单元格后粘贴。
4、粘贴之后点击右下角的粘贴选项——选择:匹配目标格式。
5、接着把多余的内容删除掉,内如图选择大小和修改日期这两列的内容删除掉。
6、然后在B2单元格输入如下公式:容=HYPERLINK("F:\2017秋质量分析\2017期考\"&A2,A2)。就是=HYPERLINK(文件夹路径"&A2,A2)——往下填充公式。
7、批量添加就完成了。