可以考虑转用VBS调用

这个代码好像在EH论坛看到过，看了大佬你发的几个动作都是用到宏的，这些代码其实可以转化为VBS脚本，然后用QUICKER加载直接运行，不必要先在工作簿里插入宏代码然后再调用VBE去运行的，脚本更加方便。而且有VBA基础就会VBS，没有难度。

当然，如果是想要用到本身已写的宏，也可以调用VBS脚本去加载，不必调出VBE窗口，VBS代码如下：

Dim application

Set application = GetObject(,"excel.application")

application.run "过程名称"

Set application = Nothing