Bonjour
Je voudrais ins=E9rer dans un userform le contr=F4le
suppl=E9mentaire Date & Time Picker 6.0.
Jusque l=E0 pas de probl=E8me.=20
Mon contr=F4le va servir =E0 ce que mon utilisateur choisisse
une date de livraison. Mais je voudrais qu'il ne puisse pas
choisir un date inf=E9rieur =E0 15 jours de plus que la date de
sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la
date de livraison serait au minimum le 30.03.2005.
D=E9j=E0, est-ce possible et si oui pourriez-vous m'aider, car
je ne vois pas comment attaquer ce code.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Bonjour Adrien,
Tu pourrais utiliser quelque chose comme ceci
'-------------------------- Private Sub DTPicker1_Change()
If Me.DTPicker1.Value < Date + 15 Then MsgBox "Valeur minimale acceptable : " & _ "Date d'aujourd'hui + 15 jours." Me.DTPicker1.Value = Me.DTPicker1.Value + 15 End If
End Sub '--------------------------
Salutations!
"Adrien" a écrit dans le message de news: 085601c529a6$13411730$ Bonjour Je voudrais insérer dans un userform le contrôle supplémentaire Date & Time Picker 6.0. Jusque là pas de problème. Mon contrôle va servir à ce que mon utilisateur choisisse une date de livraison. Mais je voudrais qu'il ne puisse pas choisir un date inférieur à 15 jours de plus que la date de sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car je ne vois pas comment attaquer ce code.
Merci
Adrien
Bonjour Adrien,
Tu pourrais utiliser quelque chose comme ceci
'--------------------------
Private Sub DTPicker1_Change()
If Me.DTPicker1.Value < Date + 15 Then
MsgBox "Valeur minimale acceptable : " & _
"Date d'aujourd'hui + 15 jours."
Me.DTPicker1.Value = Me.DTPicker1.Value + 15
End If
End Sub
'--------------------------
Salutations!
"Adrien" <anonymous@discussions.microsoft.com> a écrit dans le message de news:
085601c529a6$13411730$a601280a@phx.gbl...
Bonjour
Je voudrais insérer dans un userform le contrôle
supplémentaire Date & Time Picker 6.0.
Jusque là pas de problème.
Mon contrôle va servir à ce que mon utilisateur choisisse
une date de livraison. Mais je voudrais qu'il ne puisse pas
choisir un date inférieur à 15 jours de plus que la date de
sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la
date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car
je ne vois pas comment attaquer ce code.
'-------------------------- Private Sub DTPicker1_Change()
If Me.DTPicker1.Value < Date + 15 Then MsgBox "Valeur minimale acceptable : " & _ "Date d'aujourd'hui + 15 jours." Me.DTPicker1.Value = Me.DTPicker1.Value + 15 End If
End Sub '--------------------------
Salutations!
"Adrien" a écrit dans le message de news: 085601c529a6$13411730$ Bonjour Je voudrais insérer dans un userform le contrôle supplémentaire Date & Time Picker 6.0. Jusque là pas de problème. Mon contrôle va servir à ce que mon utilisateur choisisse une date de livraison. Mais je voudrais qu'il ne puisse pas choisir un date inférieur à 15 jours de plus que la date de sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car je ne vois pas comment attaquer ce code.
Merci
Adrien
docm
Bonjour.
Tu pourrais jouer avec la propriété MinDate. Exemple: DTPicker1.MinDate = Date + 15
Amicalement.
"Adrien" wrote in message news:085601c529a6$13411730$ Bonjour Je voudrais insérer dans un userform le contrôle supplémentaire Date & Time Picker 6.0. Jusque là pas de problème. Mon contrôle va servir à ce que mon utilisateur choisisse une date de livraison. Mais je voudrais qu'il ne puisse pas choisir un date inférieur à 15 jours de plus que la date de sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car je ne vois pas comment attaquer ce code.
Merci
Adrien
Bonjour.
Tu pourrais jouer avec la propriété MinDate.
Exemple: DTPicker1.MinDate = Date + 15
Amicalement.
"Adrien" <anonymous@discussions.microsoft.com> wrote in message
news:085601c529a6$13411730$a601280a@phx.gbl...
Bonjour
Je voudrais insérer dans un userform le contrôle
supplémentaire Date & Time Picker 6.0.
Jusque là pas de problème.
Mon contrôle va servir à ce que mon utilisateur choisisse
une date de livraison. Mais je voudrais qu'il ne puisse pas
choisir un date inférieur à 15 jours de plus que la date de
sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la
date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car
je ne vois pas comment attaquer ce code.
Tu pourrais jouer avec la propriété MinDate. Exemple: DTPicker1.MinDate = Date + 15
Amicalement.
"Adrien" wrote in message news:085601c529a6$13411730$ Bonjour Je voudrais insérer dans un userform le contrôle supplémentaire Date & Time Picker 6.0. Jusque là pas de problème. Mon contrôle va servir à ce que mon utilisateur choisisse une date de livraison. Mais je voudrais qu'il ne puisse pas choisir un date inférieur à 15 jours de plus que la date de sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car je ne vois pas comment attaquer ce code.
Merci
Adrien
Merci pour cette réponse, mais je pense utiliser celle de MichDenis car il affiche un message d'information.
Merci quand même...
-----Message d'origine----- Bonjour.
Tu pourrais jouer avec la propriété MinDate. Exemple: DTPicker1.MinDate = Date + 15
Amicalement.
"Adrien" wrote in message
news:085601c529a6$13411730$ Bonjour Je voudrais insérer dans un userform le contrôle supplémentaire Date & Time Picker 6.0. Jusque là pas de problème. Mon contrôle va servir à ce que mon utilisateur choisisse une date de livraison. Mais je voudrais qu'il ne puisse pas choisir un date inférieur à 15 jours de plus que la date de sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car je ne vois pas comment attaquer ce code.
Merci
Adrien
.
Merci pour cette réponse, mais je pense utiliser celle de
MichDenis car il affiche un message d'information.
Merci quand même...
-----Message d'origine-----
Bonjour.
Tu pourrais jouer avec la propriété MinDate.
Exemple: DTPicker1.MinDate = Date + 15
Amicalement.
"Adrien" <anonymous@discussions.microsoft.com> wrote in
message
news:085601c529a6$13411730$a601280a@phx.gbl...
Bonjour
Je voudrais insérer dans un userform le contrôle
supplémentaire Date & Time Picker 6.0.
Jusque là pas de problème.
Mon contrôle va servir à ce que mon utilisateur choisisse
une date de livraison. Mais je voudrais qu'il ne puisse pas
choisir un date inférieur à 15 jours de plus que la date de
sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la
date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car
je ne vois pas comment attaquer ce code.
Merci pour cette réponse, mais je pense utiliser celle de MichDenis car il affiche un message d'information.
Merci quand même...
-----Message d'origine----- Bonjour.
Tu pourrais jouer avec la propriété MinDate. Exemple: DTPicker1.MinDate = Date + 15
Amicalement.
"Adrien" wrote in message
news:085601c529a6$13411730$ Bonjour Je voudrais insérer dans un userform le contrôle supplémentaire Date & Time Picker 6.0. Jusque là pas de problème. Mon contrôle va servir à ce que mon utilisateur choisisse une date de livraison. Mais je voudrais qu'il ne puisse pas choisir un date inférieur à 15 jours de plus que la date de sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car je ne vois pas comment attaquer ce code.
Merci
Adrien
.
Adrien
Bonjour MichDenis...
Dans le mille... Exactement ce que je voulais merci pour votre rapidité
;-)
-----Message d'origine----- Bonjour Adrien,
Tu pourrais utiliser quelque chose comme ceci
'-------------------------- Private Sub DTPicker1_Change()
If Me.DTPicker1.Value < Date + 15 Then MsgBox "Valeur minimale acceptable : " & _ "Date d'aujourd'hui + 15 jours." Me.DTPicker1.Value = Me.DTPicker1.Value + 15 End If
End Sub '--------------------------
Salutations!
"Adrien" a écrit dans le message de news:
085601c529a6$13411730$ Bonjour Je voudrais insérer dans un userform le contrôle supplémentaire Date & Time Picker 6.0. Jusque là pas de problème. Mon contrôle va servir à ce que mon utilisateur choisisse une date de livraison. Mais je voudrais qu'il ne puisse pas choisir un date inférieur à 15 jours de plus que la date de sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car je ne vois pas comment attaquer ce code.
Merci
Adrien
.
Bonjour MichDenis...
Dans le mille... Exactement ce que je voulais
merci pour votre rapidité
;-)
-----Message d'origine-----
Bonjour Adrien,
Tu pourrais utiliser quelque chose comme ceci
'--------------------------
Private Sub DTPicker1_Change()
If Me.DTPicker1.Value < Date + 15 Then
MsgBox "Valeur minimale acceptable : " & _
"Date d'aujourd'hui + 15 jours."
Me.DTPicker1.Value = Me.DTPicker1.Value + 15
End If
End Sub
'--------------------------
Salutations!
"Adrien" <anonymous@discussions.microsoft.com> a écrit
dans le message de news:
085601c529a6$13411730$a601280a@phx.gbl...
Bonjour
Je voudrais insérer dans un userform le contrôle
supplémentaire Date & Time Picker 6.0.
Jusque là pas de problème.
Mon contrôle va servir à ce que mon utilisateur choisisse
une date de livraison. Mais je voudrais qu'il ne puisse pas
choisir un date inférieur à 15 jours de plus que la date de
sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la
date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car
je ne vois pas comment attaquer ce code.
Dans le mille... Exactement ce que je voulais merci pour votre rapidité
;-)
-----Message d'origine----- Bonjour Adrien,
Tu pourrais utiliser quelque chose comme ceci
'-------------------------- Private Sub DTPicker1_Change()
If Me.DTPicker1.Value < Date + 15 Then MsgBox "Valeur minimale acceptable : " & _ "Date d'aujourd'hui + 15 jours." Me.DTPicker1.Value = Me.DTPicker1.Value + 15 End If
End Sub '--------------------------
Salutations!
"Adrien" a écrit dans le message de news:
085601c529a6$13411730$ Bonjour Je voudrais insérer dans un userform le contrôle supplémentaire Date & Time Picker 6.0. Jusque là pas de problème. Mon contrôle va servir à ce que mon utilisateur choisisse une date de livraison. Mais je voudrais qu'il ne puisse pas choisir un date inférieur à 15 jours de plus que la date de sa demande.
Exemple si il fait sa demande aujourd'hui (15.03.2005), la date de livraison serait au minimum le 30.03.2005.
Déjà, est-ce possible et si oui pourriez-vous m'aider, car je ne vois pas comment attaquer ce code.
