首页 理论教育 高级文件操作技巧总结

高级文件操作技巧总结

时间:2023-10-27 理论教育 版权反馈
【摘要】:语法:Name oldpathname As newpathnameName "d:\test.xlsx" As "d:\test01.xlsx" '重命名Name "d:\test.xlsx" As "d:\dll\test.xlsx" '移动文件Name "d:\test.docx" As "e:\test01.docx" '跨驱动器移动并重命名文件FileCopy语句。例如,语句“Kill "*.docx"”为删除当前目录中的所有“.docx”文档。表23-2GetAttr函数的返回值、VBA常量及含义SetAttr语句。如果给一个打开的文件设置属性,则会产生错误。

高级文件操作技巧总结

这里指在不打开文件的情况对文件的操作。

(1)Name语句。

功能:重命名一个文件、目录,移动一个文件。

语法:Name oldpathname As newpathname

Name "d:\test.xlsx" As "d:\test01.xlsx" '重命名

Name "d:\test.xlsx" As "d:\dll\test.xlsx" '移动文件

Name "d:\test.docx" As "e:\test01.docx" '跨驱动器移动并重命名文件

(2)FileCopy语句。

功能:复制一个文件。

语法:FileCopy source, destination

如果复制一个打开的文件,将产生错误

(3)Kill语句。

功能:删除文件。

语法:Kill pathname。支持多字符和单字符通配符“*”和“?”。(www.xing528.com)

例如,语句“Kill "*.docx"”为删除当前目录中的所有“.docx”文档。

(4)GetAttr函数。

功能:获取一个文件、目录的属性,返回一个Integer值。返回值及其VBA常量、含义如表23-2所示。

表23-2 GetAttr函数的返回值、VBA常量及含义

(5)SetAttr语句。

功能:设置文件属性。如果给一个打开的文件设置属性,则会产生错误。

语法:SetAttr pathname, attributes

例如下列代码:

SetAttr "F:\test.txt", vbHidden + vbReadOnly ' 设置隐藏并只读

(6)FileDateTime 函数。

功能:获取一个文件被创建或最后被修改的日期和时间。

语法:FileDateTime(pathname)

免责声明:以上内容源自网络,版权归原作者所有,如有侵犯您的原创版权请告知,我们将尽快删除相关内容。

我要反馈