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