I'm not sure I follow you completely, but have you tried using Me, ie.

In the Classes Init Event:

Set OwnObjectReference = Me

I don't follow your need for a reference to itself, as you can always just use Me, it makes more sense to have a Reference to a Parent Object, i.e when you create O2, in O1:

Set O2 = New clsObject2
Set O2.CreatingObjectReference = Me

------------------
Aaron Young
Analyst Programmer
[email protected]
[email protected]