Ramener le focus sur textbox avec afterupdate

Bonjour,
je contrôle le contenu d'une textbox avec afterupdate. En cas d'erreur j'aimerais revenir sur cette textbox pour une nouvelle entrée avec je crois ce que vous appelez le focus. Avec la formule qui suit le curseur passe à la textbox suivante en validant le résultat de ma textbox. J'aimerais revenir sur celle-ci pour forcer une entrée valide. Merci de votre attention

Code:

---

1 2 3 4 5 6 7

Private Sub NAVION_AfterUpdate() NAVION = Val(NAVION) If Len(NAVION) > 3 Or Len(NAVION) < 2 Then MsgBox "Le N° saisi n'est pas valide"   End If End Sub

---

Bonjour à tous,

Pourquoi ne pas utiliser plutôt la procédure BeforeUpdate ?
Dans le cas où la saisie serait incorrecte, il suffirait de mettre Cancel à True. Ainsi le focus reste sur le TextBox concerné.

cordialement

Merci beaucoup.
C'était si simple.
Et pour ceux qui comme moi ne sont pas des kadors en VBA, voilà ce que j'ai écrit :

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub NAVION_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)   If Len(NAVION) > 3 Or NAVION = 0 Then MsgBox "Le N° saisi n'est pas valide" NAVION = "" Cancel = True End If NAVION = Val(NAVION) End Sub

---