Comment revenir sur un UserForm après msgbox

Bonsoir, j'ai un petit soucis. J'ai un useform dans lequel les opérateurs remplissent des données, si la donnée est manquante, une msgbox apparait alors leur demandant soit de cliquer sur annuler et dans ce cas de quitter l'userform(ca ca fonctionne), ou de cliquer sur recommencer et la je voudrais que la msgbox disparaisse et que l'opérateur puisse rentrer la donnée manquante (ici la date) sans effacer les autres données remplies(sinon je ferai réouvrir un formulaire vierge).

image

Voici mon code actuel, il me manque la ligne de code pour revenir en arrière sur l'userform et je ne trouve absolument rien.

Dim ret As Integer

If txtdate.Value = "" Then

MsgBox ("La date n'est pas remplie !!"), vbRetryCancel

If ret = vbRetry Then

" REVENIR SUR L USERFORM

Unload UserForm4

Else

Unload UserForm4

End If

Exit Sub

Merci d'avance pour votre aide et belle soirée.

Bonjour,

Un essai,

Dim ret As Integer
If txtdate.Value = "" Then
    If MsgBox("La date n'est pas remplie !!", vbRetryCancel) = vbCancel Then
    Unload UserForm4
    Else
    Exit Sub
End If

Bonsoir le fil

@Alice03, tout simplement

If Me.TxtDate.Value = "" Then
  If MsgBox("La date n'est pas remplie !!", vbRetryCancel, "OUPS...") = vbRetry Then Exit Sub
  ' Sinon on sort
  Unload UserForm4
End If

A+

Rechercher des sujets similaires à "comment revenir userform msgbox"