excel-vba操作文件四大方法之二利用vba文件处理语句来处理文件

《excel-vba操作文件四大方法之二利用vba文件处理语句来处理文件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、Excel-VBA操作文件四大方法之二二、利用VBA文件处理语句来处理文件   VBA包含了许多用于文件操作的语句和函数，可以满足绝大多数情况下的文件操作要求。下面我们按照操作目的进行一一介绍。（一）文件处理   1.Name语句语法：NameoldpathnameAsnewpathname功能：重命名一个文件、目录、或文件夹，移动一个文件。说明：在一个已打开的文件上使用Name，将会产生错误。进行文件操作时，一定要注意错误处理。示例：OnErrorResumeNext    '错误处理Name"f:

2、TEST.xls"As"f:TEST123.xls"  '重命名Name"f:TEST.xls"As"f:dllTEST.xls"  '移动文件Name"f:TEST.xls"As"d:TEST123.xls"  '跨驱动器移动并重命名文件注意：Name不能移动一个目录或文件夹。2、FileCopy语句语法：FileCopysource,destination功能：复制一个文件。说明：如果对一个已打开的文件使用FileCopy语句，则会产生错误。示例：FileCopy"f:TEST.xls

3、","e:TEST.xls"  '从F盘复制TEST.xls到E盘3、Kill语句语法：Killpathname功能：从磁盘中删除文件。说明：Kill支持多字符(*)和单字符(?)的统配符来指定多重文件。如果使用Kill来删除一个已打开的文件，则会产生错误。示例：Kill"f:TEST.xls"  ’删除F盘的TEST.xls文件Kill"f:*.xls"   '删除F盘所有xls文件4、GetAttr函数语法：GetAttr(pathname)功能：获取一个文件、目录、或文件夹的属性。返回一个I

4、nteger值。返回值由GetAttr返回的值，是下面这些属性值的总和：常数   值  描述vbNormal  0  常规vbReadOnly  1  只读vbHidden  2  隐藏vbSystem  4  系统文件vbDirectory  16  目录或文件夹vbArchive  32  存档文件vbalias  64  指定的文件名是别名。只在Macintosh中可用。说明：若要判断是否设置了某个属性，在GetAttr函数与想要得知的属性值之间使用And运算符与逐位比较。如果所得的结果不为零，则

5、表示设置了这个属性值。示例：Debug.PrintGetAttr("F:test.txt") '若为存档文件，在立即窗口可看到值为32Debug.PrintGetAttr("F:test.txt") '将属性—高级—可存档文件的勾去掉后，值为0为判断一个文件是否只读，可用下法:Debug.PrintGetAttr("F:test.txt")AndvbReadOnly若值非零，说明时只读的。5、SetAttr语句语法：SetAttrpathname,attributes功能：为一个文件设置属性。说明

6、：如果想要给一个已打开的文件设置属性，则会产生运行时错误。示例：SetAttr"F:test.txt",vbHidden      '设置隐藏属性。SetAttr"F:test.txt",vbHidden+vbReadOnly     '设置隐藏并只读。6、FileLen函数语法：FileLen(pathname)功能：获取一个文件的长度，单位是字节。说明：当调用FileLen函数时，不需要打开文件，如果所指定的文件已经打开，则返回的值是这个文件在打开前的大小。7、FileDateTime函数语法：

7、FileDateTime(pathname)功能：获取一个文件被创建或最后修改后的日期和时间。示例：Debug.PrintFileDateTime("F:TEST.xls")  '在立即窗口可看到2007-3-2919:28:27（二）目录处理1、CurDir函数语法：CurDir[(drive)]功能：返回当前的路径。说明：drive参数是可选的，它指定一个存在的驱动器。如果没有指定驱动器，或drive是零长度字符串("")，则CurDir会返回当前驱动器的路径。示例：Debug.PrintCurD

8、ir     '返回“C:DocumentsandSettingsycMyDocuments”。Debug.PrintCurDir("C")    '返回“C:DocumentsandSettingsycMyDocuments”。Debug.PrintCurDir("D")    '返回“D:”。2、ChDir语句语法：ChDirpath功能：改变当前的目录或文件夹。说明：ChDir语句改变缺省目录位置，但不会改变缺省驱动器位