通过创建FileSystem对象可以达到目的。下面是相应的代码:
Dim fso Set fso = CreateObject("Scripting.FileSystemObject") fso.MoveFile "file1.txt", "file2.txt"