VBA分别批量移动很多名称有规律的文件

haopengxiang24

求助：利用VBA批量移动很多文件。
         在同一文件夹下包含有很多表格，excel表格的名称有一定的规律。例如：
         Body_event1_act_body.xlsx
         Body_event2_act_body.xlsx
         Body_event3_act_body.xlsx
         Body_event4_act_body.xlsx
         表格的名称主要依据表格名称中act_后面的body、body_and_sub、knuckle_rf、lca_L、lca_R等关键部分区分，
         然后创建body、body_and_sub、knuckle_rf、lca_L、lca_R等文件夹，将原来的整个表格中想要移动的excel表格移动到相应的文件夹。
         如压缩包中的几个文件夹所示。

melville

楼主看看是不是那样。把那个文件和要移动的文件放在同一个文件夹。

haopengxiang24

melville 发表于 2018-6-21 15:07
楼主看看是不是那样。把那个文件和要移动的文件放在同一个文件夹。

多谢您啦。测试无误。我明天给你送点花