Pb de date dans filtre

Le
Michel MTO
Bonjour à toutes et tous,

Dans une petite procédure vba j'utilise ce code :

Dim Madate As Date
Madate = Date
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate, Operator:=xlAnd

Le problème c'est que lorsque j'exécute ce code, je regarde dans les
critères personnalisés et je vois le n° suivant 40425 qui correspond bien à
la date d'aujourd'hui.
Mais je voudrais que mon critère soit de la forme 09/04/2010 pour que mon
filtre puisse fonctionner.

Si vous avez des propositions ?

Merci par avance

Michel MTO
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
JB
Le #21524302
Bonjour,

http://boisgontierjacques.free.fr/pages_site/FiltreAuto.htm#FiltreDates
http://boisgontierjacques.free.fr/fichiers/jb-filtreautomatique.xls

JB

On 9 avr, 09:50, "Michel MTO"
Bonjour toutes et tous,

Dans une petite proc dure vba j'utilise ce code :

Dim Madate As Date
Madate = Date
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate, Operator:=xlAnd

Le probl me c'est que lorsque j'ex cute ce code, je regarde dans les
crit res personnalis s et je vois le n suivant 40425 qui correspond bien
la date d'aujourd'hui.
Mais je voudrais que mon crit re soit de la forme 09/04/2010 pour que mon
filtre puisse fonctionner.

Si vous avez des propositions ?

Merci par avance

Michel MTO
Daniel.C
Le #21524412
Bonjour.
Utilise :

Dim Madate
Madate = Format(Date, "mm/dd/yyyy")
Range("I1").AutoFilter
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate,
Operator:=xlAnd

Cordialement.
Daniel

Bonjour,

http://boisgontierjacques.free.fr/pages_site/FiltreAuto.htm#FiltreDates
http://boisgontierjacques.free.fr/fichiers/jb-filtreautomatique.xls

JB

On 9 avr, 09:50, "Michel MTO"
Bonjour toutes et tous,

Dans une petite proc dure vba j'utilise ce code :

Dim Madate As Date
Madate = Date
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate, Operator:=xlAnd

Le probl me c'est que lorsque j'ex cute ce code, je regarde dans les
crit res personnalis s et je vois le n suivant 40425 qui correspond bien
la date d'aujourd'hui.
Mais je voudrais que mon crit re soit de la forme 09/04/2010 pour que mon
filtre puisse fonctionner.

Si vous avez des propositions ?

Merci par avance

Michel MTO
Daniel.C
Le #21524402
Bonjour.
Utilise :

Dim Madate
Madate = Format(Date, "mm/dd/yyyy")
Range("I1").AutoFilter
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate,
Operator:=xlAnd

Cordialement.
Daniel


Bonjour à toutes et tous,

Dans une petite procédure vba j'utilise ce code :

Dim Madate As Date
Madate = Date
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate, Operator:=xlAnd

Le problème c'est que lorsque j'exécute ce code, je regarde dans les
critères personnalisés et je vois le n° suivant 40425 qui correspond bien à
la date d'aujourd'hui.
Mais je voudrais que mon critère soit de la forme 09/04/2010 pour que mon
filtre puisse fonctionner.

Si vous avez des propositions ?

Merci par avance

Michel MTO
Daniel.C
Le #21524392
Bonjour JB.
Erreur d'aiguillage. La message ne t'es pas destiné !
Daniel

Bonjour.
Utilise :

Dim Madate
Madate = Format(Date, "mm/dd/yyyy")
Range("I1").AutoFilter
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate, Operator:=xlAnd

Cordialement.
Daniel

Bonjour,

http://boisgontierjacques.free.fr/pages_site/FiltreAuto.htm#FiltreDates
http://boisgontierjacques.free.fr/fichiers/jb-filtreautomatique.xls

JB

On 9 avr, 09:50, "Michel MTO"
Bonjour toutes et tous,

Dans une petite proc dure vba j'utilise ce code :

Dim Madate As Date
Madate = Date
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate, Operator:=xlAnd

Le probl me c'est que lorsque j'ex cute ce code, je regarde dans les
crit res personnalis s et je vois le n suivant 40425 qui correspond bien
la date d'aujourd'hui.
Mais je voudrais que mon crit re soit de la forme 09/04/2010 pour que mon
filtre puisse fonctionner.

Si vous avez des propositions ?

Merci par avance

Michel MTO
Michel MTO
Le #21524522
Encore une fois merci Daniel, super
Michel

"Daniel.C" news:eL$
Bonjour.
Utilise :

Dim Madate
Madate = Format(Date, "mm/dd/yyyy")
Range("I1").AutoFilter
Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate,
Operator:=xlAnd

Cordialement.
Daniel


> Bonjour à toutes et tous,
>
> Dans une petite procédure vba j'utilise ce code :
>
> Dim Madate As Date
> Madate = Date
> Range("I1").AutoFilter Field:=9, Criteria1:="<=" & Madate,


Operator:=xlAnd
>
> Le problème c'est que lorsque j'exécute ce code, je regarde dans les
> critères personnalisés et je vois le n° suivant 40425 qui correspond


bien à
> la date d'aujourd'hui.
> Mais je voudrais que mon critère soit de la forme 09/04/2010 pour que


mon
> filtre puisse fonctionner.
>
> Si vous avez des propositions ?
>
> Merci par avance
>
> Michel MTO


Publicité
Poster une réponse
Anonyme