No.1

VBA对文件操作，如果按文件修改时间进行排序操作，那么如何获取文件的修改日期呢？

本节重点介绍一下，使用FileDateTime函数，返回文件创建或修改日期的操作方法。

文件管理可以做成一个树型结构的表单进行显示，通常Windows窗体的文件管理器也会有类似的树型结构。

本节不做树型结构，简单地把选择的文件进行一个填表操作。

表内容包括：文件地址，文件修改日期和时间和文件大小。

结果如下图所示：

No.2

应用知识：

1. 返回文件修改时间函数：FileDateTime(PathName)
2. 返回文件大小函数：FileLen(PathName)
3. 文件选择器：Application.FileDialog(msoFileDialogFilePicker)
4. 数组转置方法：Application.WorksheetFunction.Transpose(Darr)
5. 字符格式化函数：VBA.Format(Dv, "yyyy年mm月dd日")

代码中用到如上几个关键的地方，需要掌握这些方法或函数的使用。

在以前的一些文章中已经有些介绍，如有不理解的地方，可查看一下相关介绍。

下图为按钮代码：

本例中只有一个按钮对象，单击之后弹出下图，这是一个文件选择器对话框。

也就是说可以选择下列文件，任意选择一些文件，之后确定。

被选择的文件名和文件修改日期、时间、文件大小等信息就添加到工作表当中了。

功能很单一，但使用起来还是有一些可取之处的。

特别是对于文件管理方面的记录，十分有用。

下图为过程代码中用到的自定义函数和过程。

No.3

返回文件创建、修改时间函数

语法：FileDateTime(PathName)

语法中只有一个参数：PathName。

PathName指定文件名的字符串表达式。 PathName 可能包括目录或文件夹，以及驱动器。

返回的值是文件修改的日期和时间，在实现应用中可能需要将日期和时间分开，所以用到Format()函数对返回结果进行格式化。

No.4

返回文件大小函数

语法：FileLen(PathName)

注意：如果在调用 FileLen 函数时指定的文件已打开，则返回的值表示在打开的前一刻该文件的大小。

也就是说当前编辑的文件如果没有保存，那么返回的文件大小，就是打开前的文件大小。

---END---

欢迎关注、收藏。