ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

   
高效办公必会的Office实战技巧 永久免费,网表让Excel秒变数据库 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
Excel不给力? 何不试试FoxTable! Excel函数公式学习大典 Office 365免费试用,报名现在开始! 免费下载Excel行业应用视频
300集Office 2010微视频教程 Tableau-数据可视化工具 打造核心竞争力的职场宝典 13门Excel免费公开课任你学
你的Excel 2010实战技巧学习锦囊 欲罢不能, 过目难忘的 Office 新界面 免费的Excel考勤计算系统
查看: 835|回复: 25

[分享] 获取指定文件夹及其子文件夹下所有文件信息、并做成超链接

[复制链接]

TA的精华主题

TA的得分主题

发表于 2018-1-11 19:57 | 显示全部楼层 |阅读模式
获取指定文件夹及其子文件夹下所有文件信息(文件大小,创建日期,修改日期,文件类型等)、并做成超链接方便打开,这个问题我回答过无数遍了还有人要问,干脆发个帖好了!附图和附件如下:
获取指定文件夹及其子文件夹下所有文件.zip (27.02 KB, 下载次数: 87)

评分

参与人数 5财富 +20 鲜花 +8 收起 理由
乐乐2006201505 + 1 优秀作品
fxl447098457 + 3 值得肯定
一把小刀闯天下 + 2 感谢分享,我下个学习一下
lsc900707 + 20 值得肯定
zhaojiaoyang200 + 2 感谢分享

查看全部评分

TA的精华主题

TA的得分主题

发表于 2018-1-11 21:08 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-1-12 07:25 来自手机 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-1-12 08:39 | 显示全部楼层
有人想把文件类型改为文件后缀,比如123.txt的文件类型为txt,可以把

Cells(Rows.Count, 5).End(3).Offset(1) = f.Type   改为:

Cells(Rows.Count, 5).End(3).Offset(1) = Mid(f.Name, InStrRev(f.Name, ".", -1, 1) + 1)

TA的精华主题

TA的得分主题

发表于 2018-1-13 10:11 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-1-13 10:31 | 显示全部楼层
如果我的单元格已经通过公式插入了超链接,如何在后面的单元格查找到超链接文件的创建和更新时间?谢谢

TA的精华主题

TA的得分主题

发表于 2018-1-13 10:54 | 显示全部楼层
如果我的单元格已经通过公式插入了超链接,如何在后面的单元格查找到超链接文件的创建和更新时间?谢谢

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-1-13 10:55 | 显示全部楼层
shi7361 发表于 2018-1-13 10:31
如果我的单元格已经通过公式插入了超链接,如何在后面的单元格查找到超链接文件的创建和更新时间?谢谢

用公式,我不会获取。你可以去公式板块问问。

TA的精华主题

TA的得分主题

发表于 2018-1-13 10:57 | 显示全部楼层
ivccav 发表于 2018-1-13 10:55
用公式,我不会获取。你可以去公式板块问问。

用代码也行吧?参照文件在前一列出现了,用代码读取一下文件不可以么?我是这么想的

TA的精华主题

TA的得分主题

发表于 2018-1-13 12:06 | 显示全部楼层
楼主,问个问题怎么把文件所在的文件夹名称提取出来然后做个路径?做在后面路径后G列呢?

Cells(Rows.Count, 7).End(3).Offset(1) = ????

感谢楼主!
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

关注官方微信,每天学会一个新技能

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2018-8-21 19:50 , Processed in 0.080319 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 2001-2017 Wooffice Inc.

   

沪公网安备 31011702000001号 沪ICP备11019229号

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:徐怀玉律师 李志群律师

快速回复 返回顶部 返回列表