1、需求实例化：如图，需要将“五座神山”文件夹下的5个表格（实际可能遇到100个文件）中的第一个表格“神山百科”删除掉。
3、打开新建的excel文件，在空表处新建一个按钮。点开发工具---插入按钮。
5、右键单击microsoft excel 对象，在弹出的对话框列表中选择插入--模块。
7、注释：根据你表格的情况和位置，可以改动一下语句更改五座神山，获得你工作簿的名称。filename = Dir(ThisWorkbook.Path & "\五座神山" & "\*.xlsx")更改五座神山，获得你工作簿的路径。fn = ThisWorkbook.Path & "\五座神山\" & filename '设置fn为路径；worksheets(1)，即需要删除的表格，这里是第一个工作表；可以根据你的模版和需要加入的位置更改为其他数字。twb.Worksheets(1).delete
8、关闭VB编辑器，将按钮和宏命令关联起来。关联的方法如下：https://jingyan.baidu.com/article/574c521951bc466c8c9dc16f.html
