arrays - VBA コンパイル エラー: カスタム クラス Get プロパティから配列を返す読み取り専用プロパティに代入できません

Question

VBA (Excel 2010) のカスタム クラスからのGetプロパティに問題があります。インデックス引数が指定されていない場合、Get プロパティはクラスの配列への参照 (少なくともそれが私の印象です) を返す必要があります。インデックスが指定されている場合は、プライベート配列の指定されたインデックスの値を返す必要があります。

' Custom Class Properties
Private pMtbSheets() As String

'Get and Let Methods
Public Property Get MtbSheets(Optional index As Variant) As String()
    If IsMissing(index) Then
        ReDim MtbSheets(1 To UBound(pMtbSheets))
        MtbSheets = pMtbSheets()
    Else
        ReDim MtbSheets(1 To 1)
        MtbSheets(1) = pMtbSheets(index) '**Compiler error occures here**
    End If
End Property

誰もが提供できる助けをありがとう