aminesc70
Messages postés dimanche 25 octobre 2015Date d'inscription
3 juillet 2017
Dernière intervention
-
2 févr. 2016 à 16:03 - Dernière réponse : aminesc70
Messages postés dimanche 25 octobre 2015Date d'inscription
3 juillet 2017
Dernière intervention
- 3 févr. 2016 à 23:19
If IsDate(date_depense.Value) And date_depense.Text Like "##/##/####" And Val(Mid(date_depense.Text, 4, 2)) < 13 Then
' forma de date corecte ==> ne rien faire
Else
MsgBox "la date doit être valide et à saisir obligatoirement sous la forme jj/mm/aaaa"
End If
End Sub
si la date n'est pas correcte le message est afficher je veux aussi qu'on peux pas saisir autre chose si la correction de la date ne sois pas encore faite
ucfoutu18039
Messages postés lundi 7 décembre 2009Date d'inscriptionModérateurStatut
11 avril 2018
Dernière intervention - 3 févr. 2016 à 05:21
0
Merci
Va voir le petit cadeau matinal que je viens de déposer dans ton autre discussion.
Il est probablement tel que la question actuelle ne se pose même plus.
