Boîte de diologue+petite modification

Résolu
Luni -  
 Luni -
Bonjour,

J'ai un fichier et je voudrais que lorsque je saisie une date en 2010 sur la boîte de dialogue qu'il me mette en garde en me demandant si je suis certaine qu'il s'agit de 2010 ou si c'est 2011. :-) Oui je sais mais bon le début d'année est toujours difficile et une erreur est vite arrivée. Je n'ai pas fini de saisir les sondages du mois de décembre il se peut qu'il ait encore des 2010.

Et voici le lien https://www.cjoint.com/?3ctlfWa4ELA

Merci beaucoup pour votre aide.

1 réponse

  1. lermite222 Messages postés 9042 Statut Contributeur 1 199
     
    Bonjoue,
    Dans le code du formulaire ajouter...
        'On vérifie que les champs obligatoires sont correctement remplis
        
        If textnom.Text = "" Then
            MsgBox "Veuillez remplir le nom de votre contact", vbCritical, "Champs Manquant"
            textnom.SetFocus
        ElseIf textprenom.Text = "" Then
            MsgBox "Veuillez remplir le prénom de votre contact", vbCritical, "Champs Manquant"
            textprenom.SetFocus
        ElseIf Year(Now) <> Year(textdate) Then
            MsgBox "Le message que tu veux pour la date"
        Else
    ...

    A+
    1
    1. Luni
       
      Superbe, ça marche merci beaucoup.
      0