Высвобождение памяти в VBA

Кто-нибудь ответьте пожалуйста. Погибаю!
Дело в том, что при многократном выполнении команды Move AutoCad забирает у системы много памяти. При завершении моего VBA приложения память не высвобождается. Я многое пробовал, но радикального решения этой проблемы я не нашёл.
С уважением Александр Гадалов.

В Excel такой же еффект. Первый раз макрос на VBA отрабатывает довольно быстро. А далее с каждым новым запуском работает заметно медленнее. Правда система ни разу не висла. Я не спец в программировани, но подозреваю, что при прямом обращении к обектам (минуя переменные) выделяется память. Чем больше обектов, тем больше памяти на них уходит. Возможно, при повторном прямом обращении к тому же объекту выделяется еще память. Сбросить память можно только для переменных. Отсюда может быть верен вывод: если есть проблема с памятью, то к максимальному количеству объектов желательно обращаться только через переменные. Для большого количества объектов должна происходить постоянная перезапись разных объектов в одну и ту же соответствующую переменную. Вероятно при этом не будет расходоваться дополнительная память. А память отведенная под переменные может быть легко сброшена. Код конечно растянется но может быть это решение. Что скажете?

Позвольте кое-что уточнить. Давайте рассмотрим небольшой кусочек программы.
For I = 0 To 10
        appendObj.Move firstPoint, secondPoint
        appendObj.Update
Next I
В данном случае объект был создан  всего один раз, поэтому он не может съесть памяти больше , чем он уже съел. Однако при каждом его перемещении acad запрашивает дополнительные ресурсы памяти. Самое неприятное то, что при одинаковых действиях он запрашивает разные порции памяти. Я недавно начал работать в этой программе, но мне кажется, что при перемещении какого-либо объекта acad создаёт и расширяет массив базовых точек для каждого объекта с целью построения вектора перемещения. Что же касается разного объёма запрашиваемой памяти, то я думаю, что это связано с опережением запроса на выделение нового блока, с целью повысить скорость выполнения данной операции.
Я попытался всякий раз вызывать API функции GetProcessHeaps и HeapCompact для высвобождения неиспользуемых куч, однако и это не помогло. Видимо acad не перезаписывает этот массив. Если я не прав - поправьте меня. Если же прав, тогда позвольте задать вопрос: для чего acad хранит всю историю преобразований объектов?
P.S.  Возможно для реализации команды UNDO, однако UNDOCTL=0 не помогает. Можно конечно подключиться к процессу и попробовать получить адреса массивов с целью их перезаписи, но не зная броду не лезу в воду.

Александр, осмелюсь только лишь пояснить свою мысль упрямого дилетанта. Что если Ваш пример переписать так:
For I = 0 To 10
set appendObj=...
appendObj.Move firstPoint, secondPoint
appendObj.Update
appendObj=Nothing
Next I
К сожалению мои макросы не тянут на эту проверку.  А то я бы попробовал.
С уважением, Брагин.