Ⅰ 如何利用vba代码批量提取文件名及修改日期到Excel表
程序代抄码:
OptionExplicit
SubYgB()
Dimp,i,fn
i=1
p="d:doc"
fn=Dir(p&"*.*")
Whilefn<>""
Cells(i,1)=fn
Cells(i,2)=FileDateTime(p&fn)
i=i+1
fn=Dir
Wend
EndSub
运行示例:
Ⅱ VBA用曰期控件动态打开文件,文件名命名格式为YYYY-MM-DD.xls,如何用日期控件打开对
FileName = Format(DTPicker1.Value, "yyyy-mm-dd") & ".xls"
Ⅲ 如何利用vba代码提取文件修改日期
第一次将文件名及文件修改时间提取出来,然后感觉文件修改时间进行排序,达到楼主要求打开文件的顺序。
比如文件1.XLS 修改时间7月2日是排位第一的,就直接打开1.xls文件即可了。