On Event ステートメントまたは Evaluate 関数かステートメントの中で製品のオブジェクトの参照が予期される場所で、ユーザー定義オブジェクトへの参照が使用されています。これは許可されません。 以下に例を示します。
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.
関数かステートメントを削除するか、製品のオブジェクトを参照するように変更してください。