このエラーの原因として、次のことが考えられます。
引数を値渡しするか、正しい型の引数を渡してください。
正しい種類の引数を渡してください。
正しい種類の引数を渡してください。
Type myType
A As Integer
End Type
Dim typeInst As myType
Dim varV As Variant
varV = typeInst ' Illegal
これは許可されません。 代入ステートメントを削除してください。
Class MyClass
' ...
End Class
Dim X As New MyClass
Dim N As Integer
N% = 5
Set X = N% ' Illegal
これは許可されません。 代入ステートメントを削除してください。
Class MyClass
' ...
End Class
Dim X As New MyClass
Dim N As Integer
Set N% = X ' Illegal
これは許可されません。 代入ステートメントを削除してください。
Class MyClass
' ...
End Class
Class BaseClass
' ...
End Class
Class DerivedClass As BaseClass
' ...
End Class
Dim A As New MyClass
Dim B As New BaseClass
Dim D As New DerivedClass
Set B = A ' Illegal
Set D = B ' Illegal
Set B = D ' Legal
代入を削除するか、指定し直してください。
Class MyClass
' ...
End Class
Dim X As New MyClass
Dim N As Integer
Set N% = New MyClass ' Illegal
代入を削除するか、指定し直してください。
ReDim ステートメントのデータ型を、宣言またはその配列がターゲットだった前の ReDim ステートメントの型と一致するように変更するか、ReDim ステートメントからデータ型を削除してください。動的配列のデータ型を一度宣言すれば、後続の ReDim ステートメントで再び指定する必要はありません。
制御変数を適切な数値型の変数に置き換えください。