以下のように不適切な文脈で ReDim ステートメントが使用されています。
Dim varV As Variant
varV = 5
ReDim Preserve varV(1 To 3) ' Illegal
varV に配列を入れる場合は Preserve キーワードを削除してください。または、ReDim ステートメントを削除してください。
Class AClass
Public X As Integer
End Class
Dim varV As Variant
Set varV = New AClass
ReDim varV.X(1 To 3) ' Illegal, because X isn't an array.
X を動的配列として宣言するか、ReDim ステートメントを削除してください。
Class AClass
Public X(1 To 2) As Integer
End Class
Dim varV As Variant
Set varV = New AClass
ReDim varV.X(1 To 3) ' Illegal, because X is a fixed array.
X を動的配列として定義するか、ReDim ステートメントを削除してください。