I058 プロパティの使い方が不正です: <プロパティ名>

名前を付けられたプロパティを以下のいずれかとして使用しようとしました。

Get ステートメントまたは Put ステートメント内のターゲット
Input # または Line Input # ステートメント内のターゲット
LSet、RSet、または Mid ステートメント内のターゲット

これらの目的にはプロパティではなく変数を使用する必要があります。

このエラーは、プロパティが代入ステートメントのターゲットとしてサブスクリプトと一緒に使用しれた場合にも発生します。以下に例を示します。

Dim privateArray(1 To 2) As String
Property Set MyProperty As Variant
   privateArray(1) = MyProperty(1)
   privateArray(2) = MyProperty(2)
End Property
Property Get MyProperty As Variant
   MyProperty = privateArray
End property
MyProperty(1) = "Fred"	    ' Produces error

MyProperty に値を代入するには、配列全体を代入します。

Dim anArray(1 To 2) As String
anArray$(1) = "Fred"
MyProperty = anArray