Excel/VBAでフォルダ内のすべてのファイルを移動する
仕事関係で指定フォルダの中のすべてのファイルを別フォルダに移動する必要があってExcelマクロで実装したので、忘れずに書き留めておきます。（肩宣言は省略）
移動元 = "C:\Users\...\from"
移動先 = "C:\Users\...\to"
Set fso = CreateObject("Scripting.FileSystemObject")
Call fso.MoveFile(移動元 & "\*", 移動先)
Set fso = Nothing
スポンサーリンク