不要把代码放到Thisworkbook的Open事件里。
(1)如下图,打开你的Excel文件,按“Alt+F11”打开VBA编辑窗口,然后在左侧Thisworkbook上双击,右侧的代码剪切下来。
(2)然后在左侧空白处点击右键,“插入”,“模块”。右侧空白处粘贴代码,去掉第一行和最后一行。