[Resolvido]Impedir que um formulário feche sem que um campo do Sub Formulário esteja preenchido

Boa tarde,

Pretendo impedir que o formulário NovoProcessoAcção feche sem que o campo ProcessoTribunal do subformulário NovoProcessoAcçãoSub seja preenchido.
Para o efeito, no no evento ao fechar, estou a escrever o seguinte:

Private Sub Form_Close()
If IsNull(Me.Form!NovoProcessoAcçãoSub!ProcessoTribunal.Value) Then
Me.Form!NovoProcessoAcçãoSub!ProcessoTribunal.BackColor = vbRed
MsgBox "Tem de registar o numero do processo de tribunal", vbCritical
Me.Form!NovoProcessoAcçãoSub!ProcessoTribunal.SetFocus
DoCmd.CancelEvent
Else
DoCmd.Close , "NovoProcessoAcção"
End If
End Sub

O procedimento está a ter o comportamento esperado até ao aparecimento da caixa de mensagem, quando faço Ok na caixa de mensagem, o formulário fecha apesar do campo em causa não estar preenchido.

Alguem me pode ajudar? Obrigado.

O mais prático seria desabilitar o botão de fechar do formulário, aquele com um X, e colocar um botão próprio para o fechamento. Ou então mudar essas linhas para o evento "Ao descarregar" ao invés do "Ao fechar".