如何在Excel中用VBA的for each循环批量删工作表

1、如图所示，要删除Excel文件中的多张工作表，但是其中有一张不能删。

3、添加for each循环的代码。

6、1）诔罨租磊If sht.Name <> "模板（不删）" Then：表名不等于（符号为“<>”）“模板（不删）惯墀眚篪”；2）sht.Delete：删除表；3）End If：结束if语句。

7、在执行以上代码后，发现删表时会有一个确认对话框。

9、再次执行更新的代码后，可以快速删表，并且只留下我们不要删除的那张工作表。