Format Date

MJ13

XLDnaute Barbatruc

• 17 Avril 2014

• #2

Re : Format Date

Bonjour Gérard

Essaye avec Cdate .

 

Vote positif 0 Vote négatif

G

Gelinotte

XLDnaute Accro

• 17 Avril 2014

• #3

Re : Format Date

Bonsoir,

[c4] = CDate(TextBoxDate.Value)
[l4] = CDate(TextBoxDateSouhaitée.Value)

Cliquez pour agrandir...

Effectivement, ici ça fonctionne bien.


Geli

 

Vote positif 0 Vote négatif

G

gerard55

XLDnaute Occasionnel

• 18 Avril 2014

• #4

Re : Format Date

Merci pour vos réponses
Effectivement ça fonctionne. Maos si je ne renseigne pas la date notamment pour date souhaitée (I4) ce qui est facultatif, ça bug.
J'ai essayé de mettre des conditions mais, ça ne marche pas"

[c4] = CDate(TextBoxDate.Value)
If (texteboxdatesouhaitée) = CDate(TextBoxDateSouhaitée.Value) Then
[l4] = CDate(TextBoxDateSouhaitée.Value)

End If

J'ai aussi essayé
if (TextBoxDateSouhaitée.Value) ="" then
[i4]=0
else
[i4]=CDate(TextBoxDateSouhaitée.Value)

ça ne fonctionne pas non plus dès lors que ne ne renseigne pas la date, ça bug
Si quelqu'un a une solution, merci d'avance.
a+
Gérard

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 18 Avril 2014

• #5

Re : Format Date

Re

Voici un exemple de ce qu'on peut faire à adapter.

 

Pièces jointes

• USF_TextBox_Date.xlsm

  23 KB · Affichages: 26

Vote positif 0 Vote négatif

G

gerard55

XLDnaute Occasionnel

• 19 Avril 2014

• #6

Re : Format Date

Merci MJ13
votre proposition supose de renseigner une date valide. Mais, je voudrais qu'il accepte que l'on ne renseigne pas la date (pour la 2ème date "DateLivraisonSouhaitée"
A+
Gérard

 

Vote positif 0 Vote négatif

G

gerard55

XLDnaute Occasionnel

• 19 Avril 2014

• #7

Re : Format Date

Merci MJ13
votre proposition supose de renseigner une date valide. Mais, je voudrais qu'il accepte que l'on ne renseigne pas la date (pour la 2ème date "DateLivraisonSouhaitée"
A+
Gérard

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 19 Avril 2014

• #8

Re : Format Date

Re

Je ne comprend pas trop, si tu ne renseignes pas un textbox, rien ne t'en empêche.

ex: if DateSouhaité = "" then goto suite2 avec un branchement dans ton code suite2:

Après c'est à toi à comprendre ce que tu fais et adapter le code en conséquence. Le VBA demande, quand même un peu de travail de la part du demandeur.

 

Vote positif 0 Vote négatif

G

gerard55

XLDnaute Occasionnel

• 20 Avril 2014

• #9

Re : Format Date

Merci MJ13
ça fonctionne avec GOTO. j'avais déjà essayé cette condition avec goto mais ne mettait Else pour écrire la date et ça ne fonctionnait pas.
A+
Gérard

 

Vote positif 0 Vote négatif