【書式】
Folder.Move destination
フォルダを、引数destinationに移動します。
FolderオブジェクトのMoveメソッドは、FileSystemObjectオブジェクトのMoveFolderメソッドと同じ働きをします。
Sub test56()
Dim FSO As Object
Set FSO = CreateObject("Scripting.FileSystemObject")
''C:\WorkフォルダをC:Tmpフォルダに移動します
FSO.GetFolder("C:\Work").Move "C:\Tmp\"
Set FSO = Nothing
End Sub