オブジェクトそのものではなくオブジェクトのメンバを削除するために Delete ステートメントを使用しようとしました。Delete ステートメントはオブジェクトそのものの名前を要求します。以下に例を示します。
Class MyClass
Public X As Integer
End Class
Dim varV As Variant
Set varV = New MyClass
Delete varV.X ' Illegal.
Delete varV ' Legal.
Delete ステートメントを削除するか、その引数をオブジェクト名そのものに変更してください。