OVH Cloud OVH Cloud

filtrer par macro

4 réponses
Avatar
PHIL
bonjour,

je souhaite filtrer par macro mais je n'y arrive pas.

cela s'execute mais ne filtre pas.

Pourquoi, je ne comprend pas

voici mon code:

Range("C15").Select
Selection.AutoFilter
ActiveWindow.ScrollColumn = 3
Selection.AutoFilter Field:=3, Criteria1:="<>#NOMBRE!", Operator:=xlOr
ActiveWindow.SelectedSheets.PrintPreview
Selection.AutoFilter

merci de votre aide

4 réponses

Avatar
Didier
JEAN_PHIL
Tu m'as déjà demandé cette proc
et tu m'as déjà dit qu'il y avait un pb, je t'ai dit que le pb provenait de
Selection.AutoFilter Field:=3, Criteria1:="<>#NOMBRE!",
Mets plutôt Criteria1:="<>"
le fait de remettre "Selection.AutoFilter"
enlève de nouveau le filtre
Apparemment tu ne comprends pas ce que tu fais, essaye de prendre le temps
de lire les syntaxe, elles sont pourtant très simples
Didier

"PHIL" a écrit dans le message de news:

bonjour,

je souhaite filtrer par macro mais je n'y arrive pas.

cela s'execute mais ne filtre pas.

Pourquoi, je ne comprend pas

voici mon code:

Range("C15").Select
Selection.AutoFilter
ActiveWindow.ScrollColumn = 3
Selection.AutoFilter Field:=3, Criteria1:="<>#NOMBRE!", Operator:=xlOr
ActiveWindow.SelectedSheets.PrintPreview
Selection.AutoFilter

merci de votre aide



Avatar
PHIL
mais si j'enleve #NOMBRE!
je mettrai,
Selection.AutoFilter Field:=3, Criteria1:="<>"

mais ca pas ce que je souhaite je souhaite filtrer toute les cellules dont
la valeur est #NOMBRE!

merci



JEAN_PHIL
Tu m'as déjà demandé cette proc
et tu m'as déjà dit qu'il y avait un pb, je t'ai dit que le pb provenait de
Selection.AutoFilter Field:=3, Criteria1:="<>#NOMBRE!",
Mets plutôt Criteria1:="<>"
le fait de remettre "Selection.AutoFilter"
enlève de nouveau le filtre
Apparemment tu ne comprends pas ce que tu fais, essaye de prendre le temps
de lire les syntaxe, elles sont pourtant très simples
Didier

"PHIL" a écrit dans le message de news:

bonjour,

je souhaite filtrer par macro mais je n'y arrive pas.

cela s'execute mais ne filtre pas.

Pourquoi, je ne comprend pas

voici mon code:

Range("C15").Select
Selection.AutoFilter
ActiveWindow.ScrollColumn = 3
Selection.AutoFilter Field:=3, Criteria1:="<>#NOMBRE!", Operator:=xlOr
ActiveWindow.SelectedSheets.PrintPreview
Selection.AutoFilter

merci de votre aide








Avatar
FxM
mais si j'enleve #NOMBRE!
je mettrai,
Selection.AutoFilter Field:=3, Criteria1:="<>"

mais ca pas ce que je souhaite je souhaite filtrer toute les cellules dont
la valeur est #NOMBRE!

merci



Bonjour,

Ne vaudrait-il pas mieux traiter le problème en amont pour mettre autre
chose que #NOMBRE! puis effectuer le filtre sur ce quelque chose ?

En clair, si la formule renvoyant "#nombre!" est =recherchev(...),
transforme-la en =si(esterreur(rechercheV(...);"Prob";recherchev(..))
A ce moment, tu obtiens "Prob" au lieu de "#NOMBRE!" et tu filtres sur
"Prob".

Je réponds tout de suite à la question que tu vas poser :
oui, ça ralentit *un peu* les calculs vu qu'il y en a le double à faire.

@+
FxM

Avatar
Didier
Bonjour François-xavier, c'est vrai que j'aimerai savoir combien de lignes
JEAN-PHIL doit traiter
Didier

"FxM" a écrit dans le message de news:

mais si j'enleve #NOMBRE!
je mettrai,
Selection.AutoFilter Field:=3, Criteria1:="<>"

mais ca pas ce que je souhaite je souhaite filtrer toute les cellules
dont la valeur est #NOMBRE!

merci



Bonjour,

Ne vaudrait-il pas mieux traiter le problème en amont pour mettre autre
chose que #NOMBRE! puis effectuer le filtre sur ce quelque chose ?

En clair, si la formule renvoyant "#nombre!" est =recherchev(...),
transforme-la en =si(esterreur(rechercheV(...);"Prob";recherchev(..))
A ce moment, tu obtiens "Prob" au lieu de "#NOMBRE!" et tu filtres sur
"Prob".

Je réponds tout de suite à la question que tu vas poser :
oui, ça ralentit *un peu* les calculs vu qu'il y en a le double à faire.

@+
FxM