Discussion :

[programmer_c'est_dur]

bonjour , je cherche a faire la différence entre 2 dates dans un formulaire : comme ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Texte700_Click()
Texte700.Value = DateDiff("d", date_Sortie, date_entrée)
End Sub

Ca me ramène invariablement 0

Que faire ? Faut il passer par une fonction ?

Merci de votre aide.

[helas]

Que valent date_Sortie et date_entrée ? Sont-ce des variables DATE ? ou TEXTE ? ou autres ?

[programmer_c'est_dur]

ce sont des variables dates

[philben]

bonjour,

Essayer pour voir :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
debug.print (date_sortie - date_entrée) & "j"

cordialement,
Philippe

[mout1234]

Bonjour,

ce sont des variables dates

Où sont déclarées tes variables?

Où leur donnes tu une valeur?

[programmer_c'est_dur]

les dates sont des champs date de ma table et sont remplies dans le formulaire.

[FreeAccess]

Bonjour,

...faire la différence entre 2 dates dans un formulaire ...les dates sont des champs date de ma table

Ton formulaire est donc basé sur ta table comprenant tes deux champs de type Date (date_entree et date_sortie).
Pour calculer une différence entre tes deux dates, sur ton formulaire tu crée un champ indépendant (Texte700), puis dans sa propriété "Source contrôle" tu tape simplement:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=DiffDate("j";[date_entree];[date_sortie])

Dans la fonction "DiffDate" il faut respecter l'ordre des dates:
- en premier la date_entree (la plus ancienne)
- en second la date_sortie (la plus récente)
Si tu fais l'inverse, tu auras un résultat négatif (-14)

En espérant que cela régle ton problème.
Bonne continuation...