[Resolvido]Passar para o próximo campo

Oi pessoal, estou com a seguinte situação:

Tenho o seguinte código em um campo do tipo texto, no evento "antes de atualizar":

Código:

Dim rst As DAO.Recordset
Dim strCriteria As String
'verifica duplicidade
strCriteria = "[Numero_Protocolo] Like '*" & Me.Numero_Protocolo & "*'"

Set rst = Me.RecordsetClone
    rst.FindFirst strCriteria
        If rst.NoMatch Then
' MsgBox "Exibe mensagem se for o caso"
    Else
    MsgBox " Protocolo " & Me.Numero_Protocolo & " já registrado.", vbInformation, "Aviso"
    Cancel = True
    Me.ActiveControl.Undo
End If
Cancel = True
Set rst = Nothing

Acontece que quando digito um número de protocolo que não existe ele não passa para o próximo campo, o que deveria acontecer.
Já tentei substituir MsgBox "Exibe mensagem se for o caso" por Me.Numero_Protocolo.SetFocus, conforme sugestão do grande Uilson, mas não funcionou. Aparece a mensagem: "Você deve salvar o campo antes de executar a ação IrParaControle..."

Agradeço desde já.

Olá,
O "Cancel = True" que está depois de "End If" está abortando a continuidade do programa.

Retire-o e veja como reage.

Cancel = True

duplicado após o End If

desculpa Dilson não tinha reparado que já tinhas respondido.

Tem problema não toyebom,

Responda sempre a vontade porque das duas uma: Ou vem duas soluções ou vem uma constatação como aconteceu agora. Isso já aconteceu comigo também.

Falow brother!

Obrigado pessoal. Deu certo!!!
Estou iniciando em access agora. Já li alguns livros e assisti a alguns vídeos. Mas, estou aprendendo mais na prática.

Este fórum é um grande livro!
Vlw pessoal