Bonjour,
J'ai un problème de filtrage sur les dates sous Excel 2007.
Je souhaite afficher toutes les lignes comportant une date supérieure au
10/09/2007.
En créant le filtre à l'aide du ruban je mets comme critère >10/09/2007 et
le filtrage se fait correctement.
Par contre en VBA, avec le même critère de recherche sur la même zone il n'y
a pas de sélection, toutes les lignes disparaissent.
J'utilise :
Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Range("B1:B2"), Unique:=False
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne
correctement, il semble donc que ce soit l'écriture du > ou < qui pose
problème.
Merci de votre aide.
Jd
Bonjour, J'ai un problème de filtrage sur les dates sous Excel 2007. Je souhaite afficher toutes les lignes comportant une date supérieure au 10/09/2007. En créant le filtre à l'aide du ruban je mets comme critère >10/09/ 2007 et le filtrage se fait correctement. Par contre en VBA, avec le même critère de recherche sur la même zo ne il n'y a pas de sélection, toutes les lignes disparaissent. J'utilise : Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange: = _ Range("B1:B2"), Unique:lse
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne correctement, il semble donc que ce soit l'écriture du > ou < qui pose problème. Merci de votre aide. Jd
Sub filtreSup1Date()
[A5].AutoFilter field:=5, Criteria1:=">=" &
CDbl(CDate("21/10/1970"))
ou [A5].AutoFilter field:=5, Criteria1:=">=" & "10/21/1970"
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Range("A2"))
ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Range("A2"),
"mm/dd/yyyy")
ou [A5].AutoFilter field:=5, Criteria1:=">=" &
CDbl(CDate("21/10/1970") + 30)
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date)
ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Date, "mm/dd/
yyyy")
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date + 30)
End Sub
JB
http://boisgontierjacques.free.fr
On 17 sep, 14:38, "msnews.microsoft.com" <jd...@free.fr> wrote:
Bonjour,
J'ai un problème de filtrage sur les dates sous Excel 2007.
Je souhaite afficher toutes les lignes comportant une date supérieure au
10/09/2007.
En créant le filtre à l'aide du ruban je mets comme critère >10/09/ 2007 et
le filtrage se fait correctement.
Par contre en VBA, avec le même critère de recherche sur la même zo ne il n'y
a pas de sélection, toutes les lignes disparaissent.
J'utilise :
Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange: = _
Range("B1:B2"), Unique:=False
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne
correctement, il semble donc que ce soit l'écriture du > ou < qui pose
problème.
Merci de votre aide.
Jd
Bonjour, J'ai un problème de filtrage sur les dates sous Excel 2007. Je souhaite afficher toutes les lignes comportant une date supérieure au 10/09/2007. En créant le filtre à l'aide du ruban je mets comme critère >10/09/ 2007 et le filtrage se fait correctement. Par contre en VBA, avec le même critère de recherche sur la même zo ne il n'y a pas de sélection, toutes les lignes disparaissent. J'utilise : Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange: = _ Range("B1:B2"), Unique:lse
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne correctement, il semble donc que ce soit l'écriture du > ou < qui pose problème. Merci de votre aide. Jd
msnews.microsoft.com
Merci pour cette réponse rapide, le problème est résolu. JD
Bonjour, J'ai un problème de filtrage sur les dates sous Excel 2007. Je souhaite afficher toutes les lignes comportant une date supérieure au 10/09/2007. En créant le filtre à l'aide du ruban je mets comme critère >10/09/2007 et le filtrage se fait correctement. Par contre en VBA, avec le même critère de recherche sur la même zone il n'y a pas de sélection, toutes les lignes disparaissent. J'utilise : Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _ Range("B1:B2"), Unique:úlse
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne correctement, il semble donc que ce soit l'écriture du > ou < qui pose problème. Merci de votre aide. Jd
Merci pour cette réponse rapide, le problème est résolu.
JD
"JB" <boisgontier@hotmail.com> a écrit dans le message de
news:1190034110.465286.248410@50g2000hsm.googlegroups.com...
Bonjour,
Sub filtreSup1Date()
[A5].AutoFilter field:=5, Criteria1:=">=" &
CDbl(CDate("21/10/1970"))
ou [A5].AutoFilter field:=5, Criteria1:=">=" & "10/21/1970"
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Range("A2"))
ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Range("A2"),
"mm/dd/yyyy")
ou [A5].AutoFilter field:=5, Criteria1:=">=" &
CDbl(CDate("21/10/1970") + 30)
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date)
ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Date, "mm/dd/
yyyy")
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date + 30)
End Sub
JB
http://boisgontierjacques.free.fr
On 17 sep, 14:38, "msnews.microsoft.com" <jd...@free.fr> wrote:
Bonjour,
J'ai un problème de filtrage sur les dates sous Excel 2007.
Je souhaite afficher toutes les lignes comportant une date supérieure au
10/09/2007.
En créant le filtre à l'aide du ruban je mets comme critère >10/09/2007 et
le filtrage se fait correctement.
Par contre en VBA, avec le même critère de recherche sur la même zone il
n'y
a pas de sélection, toutes les lignes disparaissent.
J'utilise :
Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
Range("B1:B2"), Unique:úlse
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne
correctement, il semble donc que ce soit l'écriture du > ou < qui pose
problème.
Merci de votre aide.
Jd
Bonjour, J'ai un problème de filtrage sur les dates sous Excel 2007. Je souhaite afficher toutes les lignes comportant une date supérieure au 10/09/2007. En créant le filtre à l'aide du ruban je mets comme critère >10/09/2007 et le filtrage se fait correctement. Par contre en VBA, avec le même critère de recherche sur la même zone il n'y a pas de sélection, toutes les lignes disparaissent. J'utilise : Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _ Range("B1:B2"), Unique:úlse
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne correctement, il semble donc que ce soit l'écriture du > ou < qui pose problème. Merci de votre aide. Jd
JB
Je n'avais pas vu qu'il s'agissait du filtre élaboré (qui ne pose pas de pb en 2003). En 2007, avec VBA, il faut inverser jour et mois dans le critère.
Sub filtreSup1Date() [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(CDate("21/10/1970")) ou [A5].AutoFilter field:=5, Criteria1:=">=" & "10/21/1970" ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Range("A2")) ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Range("A2"), "mm/dd/yyyy") ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(CDate("21/10/1970") + 30) ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date) ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Date, "mm/d d/ yyyy") ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date + 30) End Sub
JBhttp://boisgontierjacques.free.fr
On 17 sep, 14:38, "msnews.microsoft.com" wrote:
Bonjour, J'ai un problème de filtrage sur les dates sous Excel 2007. Je souhaite afficher toutes les lignes comportant une date supérieure au 10/09/2007. En créant le filtre à l'aide du ruban je mets comme critère >10/0 9/2007 et le filtrage se fait correctement. Par contre en VBA, avec le même critère de recherche sur la même zone il n'y a pas de sélection, toutes les lignes disparaissent. J'utilise : Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange := _ Range("B1:B2"), Unique:lse
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne correctement, il semble donc que ce soit l'écriture du > ou < qui pose problème. Merci de votre aide. Jd- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Je n'avais pas vu qu'il s'agissait du filtre élaboré (qui ne pose pas
de pb en 2003).
En 2007, avec VBA, il faut inverser jour et mois dans le critère.
10/15/60
ou utiliser un critère formule:
=E2>DATE(1960;10;15)
http://boisgontierjacques.free.fr/pages_site/FiltreElabore.htm#critereformu le
JB
On 17 sep, 15:01, JB <boisgont...@hotmail.com> wrote:
Sub filtreSup1Date()
[A5].AutoFilter field:=5, Criteria1:=">=" &
CDbl(CDate("21/10/1970"))
ou [A5].AutoFilter field:=5, Criteria1:=">=" & "10/21/1970"
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Range("A2"))
ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Range("A2"),
"mm/dd/yyyy")
ou [A5].AutoFilter field:=5, Criteria1:=">=" &
CDbl(CDate("21/10/1970") + 30)
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date)
ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Date, "mm/d d/
yyyy")
ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date + 30)
End Sub
JBhttp://boisgontierjacques.free.fr
On 17 sep, 14:38, "msnews.microsoft.com" <jd...@free.fr> wrote:
Bonjour,
J'ai un problème de filtrage sur les dates sous Excel 2007.
Je souhaite afficher toutes les lignes comportant une date supérieure au
10/09/2007.
En créant le filtre à l'aide du ruban je mets comme critère >10/0 9/2007 et
le filtrage se fait correctement.
Par contre en VBA, avec le même critère de recherche sur la même zone il n'y
a pas de sélection, toutes les lignes disparaissent.
J'utilise :
Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange := _
Range("B1:B2"), Unique:=False
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne
correctement, il semble donc que ce soit l'écriture du > ou < qui pose
problème.
Merci de votre aide.
Jd- Masquer le texte des messages précédents -
Je n'avais pas vu qu'il s'agissait du filtre élaboré (qui ne pose pas de pb en 2003). En 2007, avec VBA, il faut inverser jour et mois dans le critère.
Sub filtreSup1Date() [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(CDate("21/10/1970")) ou [A5].AutoFilter field:=5, Criteria1:=">=" & "10/21/1970" ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Range("A2")) ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Range("A2"), "mm/dd/yyyy") ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(CDate("21/10/1970") + 30) ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date) ou [A5].AutoFilter field:=5, Criteria1:=">=" & Format(Date, "mm/d d/ yyyy") ou [A5].AutoFilter field:=5, Criteria1:=">=" & CDbl(Date + 30) End Sub
JBhttp://boisgontierjacques.free.fr
On 17 sep, 14:38, "msnews.microsoft.com" wrote:
Bonjour, J'ai un problème de filtrage sur les dates sous Excel 2007. Je souhaite afficher toutes les lignes comportant une date supérieure au 10/09/2007. En créant le filtre à l'aide du ruban je mets comme critère >10/0 9/2007 et le filtrage se fait correctement. Par contre en VBA, avec le même critère de recherche sur la même zone il n'y a pas de sélection, toutes les lignes disparaissent. J'utilise : Range("B4:B34").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange := _ Range("B1:B2"), Unique:lse
En supprimant le caractère plus grand que ">" le filtre VBA fonctionne correctement, il semble donc que ce soit l'écriture du > ou < qui pose problème. Merci de votre aide. Jd- Masquer le texte des messages précédents -