Not a product object

Where a reference to a product object was expected in an On Event statement or an Evaluate function or statement, you used a reference to a user-defined object. This is not allowed. For example:

Class MyClass
'...
End Class
Sub MySub
'...
End Sub
Dim varV As Variant
Set varV = New MyClass
On Event Click From varV Call MySub		' Illegal.
On Event Click From varV Remove MySub	' Illegal.
X = Evaluate("mymacro",varV)			' Illegal.

Remove the function or statement, or change it so that it refers to a product object.