[Resolvido]VBA que o SetFocus não funciona...

Caros colegas, este procedimento não funciona corretamente, pois o focus fica no campo seguinte ao N_Saida2. Por que isto acontece?

Private Sub VerificaSaida2()
If N_Saida2.Value < N_Saida1.Value Then
MsgBox "Numero de Saida2 da Série não pode ser menor que o numero de Saida1. Relance, por favor", vbInformation, "Atenção"
N_Saida2.Value = 0
N_Saida2.SetFocus
End If
End Sub

Onde estou errando?
Agradeço desde já!

Em que evento está tentando isso? De qualquer forma, pode tentar enviar para outro campo primeiro para depois retornar ao campo que quer.

Criquio, o evento é:
Private Sub N_Saida2_AfterUpdate()
VerificaSaida2
End Sub
Coloquei o SetFocus no campo N_Saida1 que é o anterior ao N_saida2 e ficou no N_Saida1. Por que então não acata quando peço N_Saida2.SetFocus?

O criquio lhe deu a dica certa, eu mesmo já fiz isso.


Private Sub VerificaSaida2()
If N_Saida2.Value < N_Saida1.Value Then
MsgBox "Numero de Saida2 da Série não pode ser menor que o numero de Saida1. Relance, por favor", vbInformation, "Atenção"
N_Saida2.Value = 0
Me.N_Saida1.Setfocus
Me.N_Saida2.SetFocus
End If
End Sub

Criquio e Topbr, obrigado!
Topbr, eu não havia entendido a orientação do Criquio. Valeu!
Ficou muito legal! Parabéns a ambos!

Valeu amigão!!!

Favor não esquece de clicar no botão Resolvido sempre que resolver uma dúvida. Dessa vez em mesmo clico.

Criquio, você tem razão! Desculpe-me!