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

2025-01-04 21:03:32

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

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

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

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

6、1)If sht.Name <> "模板(不删)" Then:表名不等于(符号为“<>”)“模板(不删)”;2)sht.Delete:删除表;3)End If:结束if语句。

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

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

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

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