VBA学习笔记（2）之文件操作

今天学到了有关文件的创建以及读写的一些操作

Dim MyFile,MyName,MyPath

1.文件另存为

2.查找指定目录的文件名

MyName = Dir(MyPath,vbDirectory)  '指定的是在MyPath这个路径下的文件名，从第一个文件开始，这里我们可以做一个循环，循环体内不要忘记写上MyName=Dir，表示寻找下一个文件了

3.查找指定目录下指定后缀的文件名

MyFile= Dir（"C:\*.TXT"）此为寻找该目录下所有的txt文件，同样用loop来实现，MyFile= Dir（"C:\*.TXT"，vbHidden）表示隐藏的.txt文件，MyFile=Dir寻找下一个文件。*可以指定成具体的文件名，则无需循环

4.在指定目录下的文件里写入数据

Open MyPath & MyFile  For Append AS #1

Print #1,"这是追加的内容"