プロパティで指定した引数の数は、同じでなければなりません。

指定した引数の数が足りません。Property Let または Property Set の引数の数は、対応する Property Get から返される引数より 1 つ多くする必要があります。

このエラーを解決するには

Property Let と Property Set の引数の数が、Property Get で返される引数の数より少なくとも 1 つ多くなるようにします。

参照

Property Let ステートメント | Property Set ステートメント | Property Get ステートメント