Quitter macro après fermeture Userform

Bonjour le forum,

voilà mon soucis que je ne peux résoudre.

J'ai un UF qui apparaît au cours d'une macro où Il y a une TextBox a remplir, avec un bouton Valider.

En mode normal, tout fonctionne (je remplie la TextBox, puis je valide), ensuite la macro continu.

Mais lorsque je quitte le UF avec la croix, la macro continue aussi, mais il faudrait qu'elle s'arrête.

Voici la macro :

Sub arret()

UserForm_CA.Show

'Ici il faudrait une condition pour dire 'si la croix est validé, on quitte la macro'

MsgBox "OK"

End Sub

Voici la UF :

Private Sub CommandButton_VALIDE_Click()

If IsNumeric(TextBox_QTE.Value) Then 'SI valeur numérique ...

Sheets("Feuil1").Range("N5") = TextBox_QTE.Value

Unload UserForm_CA

Label_ValNum.Visible = False 'Label masqué

Else 'SINON ...

Label_ValNum.Visible = True 'Label visible

MsgBox "Valeur incorrecte", vbExclamation

End If

End Sub

Merci d'avance pour votre aide.

A+.

Bonjour

Une solution : Testes ta cellule

Si vide --> Fermeture par la croix ---> tu quittes la macro

Si non vide --> Fermeture par validation --> La macro continue

Sub arret()
UserForm_CA.Show
If Sheets("Feuil1").Range("N5") <> "" Then
  MsgBox "OK"
Else
  MsgBox "Fermeture par la croix"
End If
End Sub

Merci à toi,

ça fonctionne très bien.

Je valide.

Bonne continuation.

Rechercher des sujets similaires à "quitter macro fermeture userform"