Discussion :

[hebh]

Bonjour,

j'ai deux zones de texte "date début" et "date fin" je veux afficher dans un tableau toutes les dates entre mes dates. je trouve pas une fonction pour l'utiliser.

merci d'avance

[OhMonBato]

je trouve pas une fonction pour l'utiliser.

Bonjour,

c'est très étonnant, parce que si j'utilise la fonction "Rechercher" de ce forum, je trouve ça par exemple : http://www.developpez.net/forums/d98...emaines-jours/

[hebh]

je vous remercie pour votre réponse mais je vais vous expliquez plus:
j'ai 2 dates 28/09/2010 et 02/10/2010 je cherche à afficher :
28/09/2010 29/09/2010 30/09/2010 01/10/2010 02/10/2010

Merci

[Najdar]

Bonjour hebh,

Je pense que si tu regarde la fonction DateAdd et si tu utilise une boucle Do...Loop, tu devrais réussir à faire ce que tu veux?

[OhMonBato]

Comme j'ai l'impression que le mot "Recherche" est inconnu parfois, je préfère donner une solution toute faite. 2 contrôles TextBox, un contrôle Command et le code :

Code :

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

1
2
3
4
5
6
7
8
9
 
Private Sub Command1_Click()
Dim NbJours As Integer
Dim i As Integer
NbJours = DateDiff("d", Text1.Text, Text2.Text)
For i = 0 To NbJours
  Debug.Print DateAdd("d", i, Text1.Text)
Next i
End Sub

Il faut bien évidemment entrer une date avec un format valide dans les contrôles text pour que cette petite démo fonctionne.

hebh, utilises tu l'aide de VB (MSDN) ?

[hebh]

Je vous remercie bien c'est ce que je cherchais
merciiiiiiiiiiii

[OhMonBato]

Tu aurais eu la réponse en 5 minutes en cherchant dans l'aide de VB, tout simplement en tapant "calcul date", avec codes d'exemple pour DateDiff, DateAdd. Là, tu auras attendu 24h, à ton avis, quelle est donc la meilleure méthode ?