A. Using the MoveFile method on a FileSystem object will result in a file being renamed:

Dim fso<br>
Set fso = CreateObject("Scripting.FileSystemObject")<br>
fso.MoveFile "file1.txt", "file2.txt"