Filtre avec une macro

R

romfret

Guest

• 19 Août 2003

• #2

Bjr...


As- tu essayer de mettre tacellule.Value au lieu de 10%?
Tien moi au courant, romfret

 

Vote positif 0 Vote négatif

C

Cyrille68

Guest

• 19 Août 2003

• #3

Salut et merci pour ta proposition

J'ai tenté de faire cela :
Selection.AutoFilter Field:=20, Criteria1:="S1.Value", Operator:=xlAnd

La macro tourne mais le filtre ne donne aucune valeur en tant que résultat...

Tu vois autre chose peut-etre ?
Parce que je suis paumé de chez paumé !

Merci encore

Cyrille

 

Vote positif 0 Vote négatif

M

Moa

Guest

• 19 Août 2003

• #4

Salut les gars !


Selection.AutoFilter Field:=1, Criteria1:=Range("S1").Value

Ca devrait fonctionner comme ça.

@ +

Moa

 

Vote positif 0 Vote négatif

C

Cyrille68

Guest

• 20 Août 2003

• #5

Salut MOA et les autres,

Merci pour ta proposition qui tourne mais ne donne aucune valeur alors que les valeurs existent...

Je joins le fichier pour que tu puisses voir !

Merci encore pour ton aide.

Cyrille

 

Pièces jointes

• FILTRE.xls

  36 KB · Affichages: 229
• FILTRE.xls

  36 KB · Affichages: 243
• FILTRE.xls

  36 KB · Affichages: 265

Vote positif 0 Vote négatif

M

Moa

Guest

• 20 Août 2003

• #6

Re Cyrille68 !

Je viens d'essayer et cela fonctionne bien.

Tu as peut-être un autre prob dans ton fichier.

Regarde l'exemple joint, fait avec l'enregistreur de macro, puis modifié.

@ +

Moa

 

Pièces jointes

• FiltreCyrille68.zip

  9.5 KB · Affichages: 86

Vote positif 0 Vote négatif

C

Cyrille68

Guest

• 20 Août 2003

• #7

Salut Moa et les autres,

En effet, tout marche bien.

Pour un critère alphabétique (hh dans la cellule F1 chez toi), pas de soucis.

Le souci résidait dans le fait qu'il fallait mettre un format différent au critère numérique.
Le critère nécessitait une apostrophe en première position.
Donc par ex : '10 et non pas 10.


Merci beaucoup pour ton aide.

@+

Cyrille

 

Vote positif 0 Vote négatif