非IT企業に勤める中年サラリーマンのIT日記

非IT企業でしかもITとは全く関係ない部署にいる中年エンジニア。唯一の趣味がプログラミングという”自称”プログラマー。

Excel/VBAでフォルダ内のすべてのファイルを移動する

   

仕事関係で指定フォルダの中のすべてのファイルを別フォルダに移動する必要があってExcelマクロで実装したので、忘れずに書き留めておきます。(肩宣言は省略)

 

移動元 = "C:\Users\...\from"
移動先 = "C:\Users\...\to"
Set fso = CreateObject("Scripting.FileSystemObject")
Call fso.MoveFile(移動元 & "\*", 移動先)
Set fso = Nothing
 

 

 

スポンサーリンク

 - Excel, VBA