В этой строке происходит run-ошибка:
Cells(i, "A").Formula = address1
В переменной "address1" находится формула.
Почему может быть ошибка?
Предположу, что в переменной неправильная формула.
Спасибо, мы разобрались.
Ошибка была в том, что в одной ячейке, которая участвовала в создании формулы, было пустой, и формировалась неправильная формула.