[Resolvido]Caixa de Seleção - VBA Comando

Boa tarde,

Gostaria de saber se é possível por meio de uma caixa de seleção realizar um comando para, caso a caixa esteja "não marcada" este comando me abrisse um formulário.
Tentei assim: Mas não consegui êxito. O que pode estar errado?

Private Sub Bem_Segurado__AfterUpdate()

If MsgBox("O Bem está Assegurado?", vbYesNo) = vbYes Then

MsgBox "Marcado como Bem Assegurado."
Me.Bem_Segurado_ = "Não"
Me.Bem_Entregue_.SetFocus
Else
MsgBox "Marcado NÃO Assegurado, Abrindo o Cadastro..."

DoCmd.OpenForm "Cadastro de Seguro"
"Ação de abrir o formulário de cadastro"

End If

End Sub

Tente colocar o código no evento "ao receber foco" do controle.

Boa tarde,

Descobri o erro... O formulário estava abrindo mas ficava atrás do Menu de Cadastro, por isso não conseguia visualizar. Outra coisa foi um "Sim" na opção Bem entregue.

Obrigado pela ajuda. É sempre um aprendizado.