Date comprise entre deux valeurs

Talzatior · 6 Juillet 2009

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

mromain · 6 Juillet 2009

Re : Date comprise entre deux valeurs

bonjour Talzatior,

essaye avec cette ligne :

Code:

If .Cells(lig, col).Value >= DateSerial(2009, 1, 1) And .Cells(lig, col).Value <= DateSerial(2009, 3, 31) Then

a+

Catrice · 6 Juillet 2009

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

Talzatior · 6 Juillet 2009

Re : Date comprise entre deux valeurs

Merci beaucoup pour vos deux réponses, je vais de suite tester cela

A bientôt

Date comprise entre deux valeurs

Talzatior

XLDnaute Occasionnel

mromain

XLDnaute Barbatruc

Catrice

XLDnaute Barbatruc

Pièces jointes

Talzatior

XLDnaute Occasionnel

Discussions similaires