Orphaned Objects

This leaves objects in memory and eventually you will run out of memory.
You should add a class method to your class that explicitly destroys all object references.
You should then always call this method before destroying a reference to an instance of the class.

object1.Clean 
set object1 = Nothing