Date comprise entre deux valeurs

Talzatior

XLDnaute Occasionnel
Bonjour à tous ;)

Je viens demander une confirmation quant à la syntaxe d'une condition dont j'ai besoin pour avancer ...

En effet, je souhaite savoir si l'on peut utiliser cela :

Code:
If .Cells(lig, col).Value >= 01/01/2009 and if .Cells(lig, col).value <= 31/03/2009

Merci par avance ;)
 

Catrice

XLDnaute Barbatruc
Re : Date comprise entre deux valeurs

Bonjour,

Plutot quelque chose comme ceci :

Sub Test()
lig = 1
col = 1
With ActiveSheet
If .Cells(lig, col).Value2 >= #1/1/2009# And .Cells(lig, col).Value <= #3/31/2009# Then
MsgBox "OK"
Else
MsgBox "NOK"
End If
End With
End Sub


Voir le fichier joint
 

Pièces jointes

  • Classeur1.xls
    23.5 KB · Affichages: 52
  • Classeur1.xls
    23.5 KB · Affichages: 57
  • Classeur1.xls
    23.5 KB · Affichages: 56

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
314 450
Messages
2 109 726
Membres
110 552
dernier inscrit
jasson