https://jingyan.baidu.com/article/fec4bce2722a10f2618d8b2d.html
请问在运行VBA代码时，如何让运行过程不显示
http://club.excelhome.net/thread-20711-1-1.html
程序前面加上
Application.ScreenUpdating = False
Application.DisplayAlerts = False
执行完加上
Application.DisplayAlerts = True
Application.ScreenUpdating = True