vba - サブフォームのコンボボックスからタブページを表示/非表示

Question

私は何年もの間インターネットを探し回って、私が抱えていた問題に対するこの解決策を見つけようとしてきました。

タブとサブフォーム（subForm1）で構成されるフォーム（Form1）があります。subForm1内に、AfterUpdateイベントを割り当てるコンボボックスがあります。（サブフォーム内の）コンボボックスがyesの場合は、tab1を表示します。そうでない場合は、コンボボックスがnoの場合は、tab1を非表示にします。私が探しているコードは次のようなものです：

Private Sub Combo52_AfterUpdate()
If Me.Combo52.Value = "Yes" Then
Forms!FrmAssessment.TabCtl50.Pages(5).Visible = True
ElseIf Me.Combo52.Value = "No" Then
Forms!FrmAssessment.TabCtl50.Pages(5).Visible = False
End If

何かアイデアはありますか？