【書式】
FileSystemObject.MoveFile source, destination
引数sourceに指定したファイルを、引数destinationに移動します。
引数sourceの最終要素にはワイルドカードを使用できます。詳しくはCopyFileメソッドをご覧ください。
引数destinationにすでに同名ファイルが存在する場合はエラーになります。
引数sourceに指定したファイルが読み取り専用でも移動されます。
Sub test23() Dim FSO As Object Set FSO = CreateObject("Scripting.FileSystemObject") ''C:\Tmp\フォルダ内の*.xlsxをC:\Work\フォルダに移動します FSO.MoveFile "C:\Tmp\*.xlsx", "C:\Work\" Set FSO = Nothing End Sub