В готовом проекте ускорить или упростить работу макроса - VB

Ребята Здравствуйте! по возможности! кто может! в моем проекте VB6, реализован макрос VBA, но как вы можете убедится, при запуске этого макроса происходит работа "черепахи" , как возможно ускорить процесс макроса? Буду очень признателен в помощи или указания пути решения.
p/s. последняя строка закоментированна для того что бы файл не сохранялся и не требовался новый, при выходе просто не сохранять.