如何在vba中用FileLen函数返回文件的大小？

2018年2月7日作者：ExcelOffice

5,600 次浏览暂无评论

当通过鼠标右键查看文件的属性，在弹出的属性对话框中可以查看文件的大小（以字节形式表示），如下图所示。

这个文件的大小数值可以用FileLen函数获得，代码如下：

Sub QQ1722187970()
    Dim sPath As String
    sPath = "c:\1.txt"
    MsgBox VBA.FileLen(sPath)
End Sub

运行以上代码，将弹出对话框显示30，即文件的字节大小。

如果要获取已经打开的文件的字节大小，可以使用LOF函数。

声明: 本站文章均属原创，未经作者同意必须保留此段声明，且在文章页面明显位置给出原文链接，否则视为侵权。如果想要每天都收到本站的技术文章推送，可以微信搜索公众号：水星Excel或者Excel_Office关注。其它事宜请加QQ：1722187970 或微信号：xycgenius 联系。