Discussion :

[chuspyto]

bonjour,
j' ai cette ligne de code mais je trouve qu'elle fonctionne aléatoirement(cela execute des taches meme si la date est passée)
faut il rajouter quelqechose pour specfier que toute date passée ne doit pas etre prise en compte?

Code :

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

If StrComp(testDate, Date, vbTextCompare) = 0 Then

merci d'avance

[micniv]

En supposant que testdate est bien du type Date
tu peux simplement coder

Code :

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

1
2
3
 
if testdate > date then
...

Surtout parcoure les FAQ sur les dates sur ce site

[chuspyto]

merci, j'ai essayé mais j'ai le meme resultat

Code :

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

1
2
3
4
5
6
If testDate >= Date Then
    If StrComp(Me.monLogin1, test, vbTextCompare) = 0 Then   
       .........
 
    End If
    End If

[micniv]

Tu ne dois pas mettre ta seconde boucle

Code :

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

1
2
3
4
5
6
7
If testDate >= Date Then
   'si testdate est > à la date du jour alors
   'j'execute le traitement ci-dessous
       .........
 
 
    End If