如何用VBA将Excel总表拆分为工作表

1、按ALT+F11组合键，打开VBE界面；

3、双击新生成的模块，在右侧代码区，输入如下代码：

4、运行代码，测试代码是否运行正常。