Revenir à une instruction antérieure

Bonsoir

Je suis une vraie newbie, je decouvre les userform...

J'ai une msgbox dont l'objectif est d'enregistrer un numéro de RAR

Si il n y a pas les 13 numéros requis, elle renvoi un message d'erreur. Mais dans ce cas, elle se ferme. Je voudrai qu'elle se rouvre...

Est ce qu'une bonne âme aurait une idée ?

Code :

LigneM = (Range("B65000").End(xlUp).Row + 1)

Dim Message
Message = InputBox("Saisie du numéro de RAR :", "Envoi recommandé")

Select Case Len(Message)
Case Is <> 13
MsgBox "Merci de saisir un numéro valide (13 car.)"

Case Else
Range("XAA" & LigneM) = Message
End Select

Emetteur.SetFocus

Merci et bonne soirée à tous 🙂