forcer la fermeture d'un userform

[khephrens]

bonjour à tous

dans le formulaire de la base de données (fichier joint) le champ date est rendu obligatoire avec un message d'alerte tant que le champ n'est pas saisie ou que la date est inexacte ou bien qu'elle est supérieure à la date du jour.

j'aimerais pouvoir avec le bouton "quitter" fermer le formulaire même si le champ date n'est pas renseigné.

j'avance doucement à la création de cette modeste petite base de données. si vous avez des critiques ou des idées à me suggérer n’hésitez pas

merci par avance pour votre aide

 

[Staple1600]

Re : forcer la fermeture d'un userform

Bonjour à tous

khephrens
As-tu été chercher l'inspiration tout en bas de la page?
Dans les cinq discussions similaires.
Si non, t'y précipiter pourrait t'aider

 

[khephrens]

Re : forcer la fermeture d'un userform

bonjour staple
j'y suis allé mais rien ne correspond à ma recherche, si tu as une idée je suis preneur

 

[Si...]

Re : forcer la fermeture d'un userform

salut

déplace ta ligne de contrôle

Private Sub btn_quitter_Click()
  Unload Me
End Sub

'test fait ici
Private Sub btnok_Click()
  If CDate(champ_dte) = "" Then MsgBox "oups": Exit Sub
...

 

[khephrens]

Re : forcer la fermeture d'un userform

bonjour
ça ne fonctionne pas!!
a moins que je ne m'y prenne mal .. je suis encore novice