Страница 1 из 1
помогите оптимизировать код макроса создания сводной таблицы
Добавлено: 20 мар 2008, 23:10
SunKiSSka
Доброго времени суток!
Записан с помощью макрорекодера, но с такими вещами никогда не сталкивалась. Подскажите, может кто-нибудь знает вариант поизящнее.
Спасибо!!!!
Re: помогите оптимизировать код макроса создания сводной таблицы
Добавлено: 21 мар 2008, 01:25
VictorM
SunKiSSka, здравствуйте. Как-то, в начале своей жизни на форуме я поднимал тему, посмотрите
http://forum.developing.ru/showthread.php?t=6756
т.е. для начала нужно избавиться от явного выделения листов, диапазонов, ячеек. Да и при составлении и форматировании таблицы макрорекордер пишет много лишнего.
Например, 33 строки кода
Range("E4:I56").Select и.т. можно заменить на
Код: Выделить всё
With Range("E4:I56").Borders
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
Re: помогите оптимизировать код макроса создания сводной таблицы
Добавлено: 21 мар 2008, 01:38
SunKiSSka
Re: помогите оптимизировать код макроса создания сводной таблицы
Добавлено: 21 мар 2008, 01:48
VictorM
Этот макрос для таблицы из предыдущего поста?
А то чё-то неохота воссоздавать всю таблицу для проверки

Re: помогите оптимизировать код макроса создания сводной таблицы
Добавлено: 21 мар 2008, 08:22
SunKiSSka
VictorM писал(а):Этот макрос для таблицы из предыдущего поста?
А то чё-то неохота воссоздавать всю таблицу для проверки
Да бьюсь все с одним и тем же, просто предполагаю разные варианты решения