cumul dans vba conditions supérieur à et 10 premiers

PrinceCorwin

XLDnaute Occasionnel

• 6 Février 2012

• #2

Re : cumul dans vba conditions supérieur à et 10 premiers

Bonjour,
Dans un Tableau Croisé Dynamique OUI.

Mais le dit si bien l'adage, une image vaut mille mots.
Un fichier aurait été bien aprécié.

Bonne journée

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 6 Février 2012

• #3

Re : cumul dans vba conditions supérieur à et 10 premiers

Bonjour,

Avec 2010 pour une plage A1:BZ309 avec un critèreles dix premiers <1

Code:

    ActiveSheet.Range("$A$1:$BZ$309").AutoFilter Field:=7, Criteria1:="<1", Operator:=xlAnd, Criteria2:="10", Operator:=xlTop10Items

A+

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 6 Février 2012

• #4

Re : cumul dans vba conditions supérieur à et 10 premiers

Bonjour dokaz,

avec le vba est-ce possible?

Cliquez pour agrandir...

oui, voir fichier joint

à+
Philippe

Edit: Bonjour Prince, Hasco

 

Pièces jointes

• 111.xlsm

  18.5 KB · Affichages: 60
• 111.xlsm

  18.5 KB · Affichages: 65
• 111.xlsm

  18.5 KB · Affichages: 66

Vote positif 0 Vote négatif

dokaz

XLDnaute Nouveau

• 6 Février 2012

• #5

Re : cumul dans vba conditions supérieur à et 10 premiers

Merci à tous pour vos réponses rapides et effectivement j'ai besoin du code dans plusieurs feuilles et non dans un tcd. Par contre ton fichier phluarent55 met en lecture seule et ça plante. Je vais étudier lecode en tout cas.
Hasco, le code me semble nickel !

a+

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 6 Février 2012

• #6

Re : cumul dans vba conditions supérieur à et 10 premiers

Re,

T'emballe pas trop vite, j'arrive plus à la faire marcher la soluce...😀

A+

Hello Philippe😀

 

Vote positif 0 Vote négatif

PrinceCorwin

XLDnaute Occasionnel

• 6 Février 2012

• #7

Re : cumul dans vba conditions supérieur à et 10 premiers

Bonjour le fil, tout le monde,

Le script fonctionne bien, mais j'ai juste une question.
Les lignes affichées ne sont pas "classées". Si on cherche les lignes > 53 avec 12 lignes, en fait ca n'affiche "que" les 12 premières rencontrées avec le critère >53. Mais il y en a d'autres qui ont plus que 53 que l'on affiche pas.
Est-ce grave Docteur ?

Mici

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 6 Février 2012

• #8

Re : cumul dans vba conditions supérieur à et 10 premiers

Bonjour,

N'est-ce pas le sens même de l'opérteur xlTop10Items!?

A+

 

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 6 Février 2012

• #9

Re : cumul dans vba conditions supérieur à et 10 premiers

Re,

PrinceCorwin à dit:

Le script fonctionne bien, mais j'ai juste une question.................
Mici

Cliquez pour agrandir...

j'ai juste une réponse ......... 😉😉😉

je me suis limité à faire ce qui a été demandé

question simple --------> réponse simple
question précise -------> réponse plus élaborée

à+
Philippe

 

Vote positif 0 Vote négatif

dokaz

XLDnaute Nouveau

• 6 Février 2012

• #10

Re : cumul dans vba conditions supérieur à et 10 premiers

re à tous,
effectivement un peu d'emballage (ou d'emballement?) la version criteria 1 puis criteria 2 semble avoir un problème de prise en compte des valeurs du 2e critère tel que je l'ai mis.
Sheets("anomalies").Range("$A$1:$P$50000").CurrentRegion.AutoFilter Field:=6, Criteria1:=">" & TextBox3.Value, Operator:=xlAnd, Criteria2:=TextBox4.Value, Operator:=xlTop10Items
de cette façon mes données filtrées ne prennent en compte que la valeur du critère 1 mais de la valeur vide (car saisi dans le userform après le critère1) du 2e critère. Et je ne peux pas inverser les critères car c'est bien le 1er qui est toujours saisi en 1er.
Ai-je loupé quelque chose dans le code? car c'est bien le cumul des deux critères que je souhaite avoir dans mon filtre.
merci

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 6 Février 2012

• #11

Re : cumul dans vba conditions supérieur à et 10 premiers

Re,

Il se trouve que j'avais un fichier sur lequel j'avais fais le test avant de te donner la soluce. Mais je pense que le résultat était une coïncidence, car je n'ai pas réussi à le reproduire ailleurs. Bien que l'aide excel n'en parle pas, xlTop10Items ne semble pas cumulable avec les autres opérateurs. A vérifier...

A+

 

Vote positif 0 Vote négatif

dokaz

XLDnaute Nouveau

• 6 Février 2012

• #12

Re : cumul dans vba conditions supérieur à et 10 premiers

Erf, à toutes fins utiles je voulais joindre mon fichier test avec selection bouton anomalies des 2 critères et résultat feuille anomalie.

cordialement,

 

Pièces jointes

• exemple filtre.xls

  78 KB · Affichages: 42
• exemple filtre.xls

  78 KB · Affichages: 48
• exemple filtre.xls

  78 KB · Affichages: 55

Vote positif 0 Vote négatif