excel - ユーザーフォームコントロール名の数値部分を動的に取得する方法 - VBA

Question

コンボ ボックスの 2 つの小さなリストがあります。最初のリストは Type(1-5) とラベル付けされています。2 番目のリストは Products(1-5) とラベル付けされています。対応する TYPE ボックスで行われた選択に対して保留中の各 PRODUCT ボックスにデータを入力したいと考えています。私は現在、次のことを行っています...

Private Sub Type1_Change()
    NavComboPropChange
End Sub

Sub NavComboPropChange()
    If BaseActiveControl.Name = "AVM" Then
         = Worksheets("Setup").Range("AVM").Value
    ElseIf BaseActiveControl.Name = "Appraisal" Then
         = Worksheets("Setup").Range("APPRAISAL").Value
    Else
         = Worksheets("Setup").Range("TITLES").Value
    End If
End Sub

BaseActiveControl.nameは、現在選択されているルート コントロール要素を取得します。IF、ElseIf、Else シーケンスの等号の前は、製品名と対応する値になります。

私の質問を言い換えると、製品ボックス名と組み合わせて使用​​するコントロール名の数値部分を取得する方法を知りたいです。