Нужна оптимизация макроса

Всех Приветствую ! Нужна оптимизация макроса ( Старт 123) . Задача - ускорить макрос , хотя бы в 2 раза. Вполне возможно что придётся исправить макрос1 (Старт), либо написать его заново.Так же макрос1 , почему то , не рассчитывает столбец СН - этот момент тоже нужно исправить. Если будут нужны ТЗ макросов , найду или напишу заново. Сейчас 2 прохода (Старт123) у меня занимают 10 минут (скрин).Компьютер у меня - 6 Гигов оперативки и 4 ядра процессор.