Уверены, что именно эта строка удаляет стили? Она никакого отношения к стилям не имеет.
У Вас форматирование слетает при копировании листа как новой книги. Потому что в новой книге палитра стилей применена не дефолтная, а своя.Цитата |
---|
МатросНаЗебре написал: ActiveSheet.ListObjects(1).DataBodyRange.Value |
AndreiSMT, что, это реально сохранило стили в новой книге? Хотя, может и логично - оставив таблицу, оставили ЕЁ стили. А заменяя формулы значениями во всем листе - затрагиваете другие ячейки и умная таблица удаляется. Если только так это работает.