Отъедание оперативной памяти после каждой вставки диапазона

[pier]

Добрый день.

Столкнулся с проблемой отъедания excel-ем оперативной памяти после каждого выполнения кода типа
wsa.Range(wsa.Cells(1, StartCol), wsa.Cells(1, EndCol).End(xlDown)).Copy wsb.Cells(1, 1)

От памяти отъедается примерно по 1 Мб каждый раз за 1 проход в цикле. В буфере обмена при этом сохраняется то, что копируется в данный момент. Очистить буфер не получается, память в итоге заканчивается.
Перед каждой новой вставкой лист wsb очищается командой wsb.Cells.ClearContents
и вставляется новая порция данных, это может быть 50 строк, а затем 10, каждый раз разное количество.
Как ни странно, помогает удаление листа, на который происходит вставка значений, либо закрыть файл и открыть его снова.
Перемещение по ячейкам листа wsb сильно замедляется после того как excel отъедает уже метров 300. Такое впечатление, что он копит где-то внутри себя все, что я вставлял на этот лист и как-то к этому листу привязывает, раз помогает только его удаление. Помогите советом, как буфер почистить? Или память освободить.
Application.CutCopyMode = False пробовал - это для того, чтобы погасить область копирования (пунктирную), у меня ее нет.

[IgorGO]

а проблема не в этой строке (точнее, возможно и в этой, но я не понимаю что ее здесь может вызвать)

[pier]

Да, получается, что проблема в этой строке, только криминального в ней ничего нет. Просто копирование и вставка на другой лист. Предварительно то, что копируется фильтруется с помощью автофильтра, то есть копируется часть большой таблицы.
При каждой вставке, если смотреть в диспетчер задач, то excel отъедает кусочек памяти и не возвращает ее, а накапливает.
Пробовал и просто написать
Range.Copy
Sheets("qwerty").Paste
Как только происходит paste в дебагере, сразу + память в диспетчере.
Вот и не понимаю, почему так.

[Казанский]

Сообщение от pier

Перед каждой новой вставкой лист wsb очищается командой wsb.Cells.ClearContents
и вставляется новая порция данных, это может быть 50 строк, а затем 10, каждый раз разное количество.
Как ни странно, помогает удаление листа, на который происходит вставка значений, либо закрыть файл и открыть его снова.

Откуда берутся данные листа wsa? Возможно, в копируемых диапазонах есть невидимые объекты, которые не удаляются методом Cells.ClearContents. Это бывает при копировании-вставке из веб-браузера. Посмотрите после вставки wsb.shapes.count.