运用于FileSystemObject工具的MoveFile方法将一个或多个文件从一个地方移动到另一个地方，语法如下：
object.MoveFile source, destination
参数
a) object是必须的， FileSystemObject工具的名称。
b) source是必须的，一个或多个要移动文件的路径，source参数字符串在路径的末了部件中可以利用通配符。
c) destinatio是必须的，一个或多个文件要移动到的目标路径，不能利用通配符。
如下面的代码所示。
Sub MyMoveFile()
Dim MyFile As Object
On Error Resume Next
Set MyFile = CreateObject(\公众Scripting.FileSystemObject\"大众)
MyFile.MoveFile ThisWorkbook.Path & \"大众\abc.docx\"大众, ThisWorkbook.Path & \"大众\ABC\\"大众
Set MyFile = Nothing
MsgBox \"大众OK!\"大众
End Sub代码解析：
MoveFile过程利用MoveFile方法将示例文件所在文件夹中的\公众abc.docx\"大众文件移动到\"大众ABC\"大众文件夹中。
第4行代码利用CreateObject函数创建FileSystemObject工具并将该工具赋给变量MyFile。
第5行代码利用MoveFile方法移动文件。
运行MoveFile过程将示例文件所在文件夹中的\"大众abc.docx\"大众文件移动到同一目录中的\"大众ABC\"大众文件夹。
特殊把稳点：我上述的代码在64位机已经测试，可以利用的。我的打算机如下图：
代码截图：
运行前：
运行后：
今日内容回向：
1 读者是否清楚Set MyFile = CreateObject(\公众Scripting.FileSystemObject\"大众)的意义呢？前些时还有一位读者问我这个问题，对付我的讲解： \公众CreateObject函数创建FileSystemObject工具并将该工具赋给变量MyFile。\公众是否明白呢？
2 MoveFile 是WSH的措辞，其意义是否明白呢？
分享成果，随喜正能量
