Evénement sur filtre

C

Chombi

XLDnaute Occasionnel

• 31 Août 2015

• #2

Re : Evénement sur filtre

Re bonjour

bon a priori ce n'est pas possible ou je me suis mal expliqué
je vais essayer avec un uf et une combo

merci

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

• 31 Août 2015

• #3

Re : Evénement sur filtre

Bonjour Chombi.

Pourquoi pas un n° d'ordre en face de vos noms sur la feuille Excel, reprenant l'ordre de votre feuille papier ?
Trop simple ?

 

Vote positif 0 Vote négatif

C

Chombi

XLDnaute Occasionnel

• 31 Août 2015

• #4

Re : Evénement sur filtre

Bonjour Victor21

merci de vous attarder ici

en fait c'est déjà ce que je fais mais je voudrai le faire en une fois pour gagner du temps, ouvrir à chaque fois le menu déroulant pour attribuer un numéro est long et source d'erreur, je voudrai automatiser l'affaire

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 31 Août 2015

• #5

Re : Evénement sur filtre

Bonjour,

Et pourquoi pas un clic-droit sur le nom qui t'ajoute le n° suivant dans une colonne dédiée ?
Plus qu'à trier dessus après.
erioc

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 31 Août 2015

• #6

Re : Evénement sur filtre

Bonjour,

http://boisgontierjacques.free.fr/fichiers/Filtre/FiltreAutoEvenement.xls

JB

 

Vote positif 0 Vote négatif

C

Chombi

XLDnaute Occasionnel

• 31 Août 2015

• #7

Re : Evénement sur filtre

Bonjour JB, eriiiic

Eriiiic merci: clic droit dans menu déroulant c'est possible? sinon je ne vois pas l’intérêt, il faut que je ferme à chaque fois le menu déroulant pour appliquer le num puis rouvrir le tri etc. Ou penses tu à autre chose?
Ce que je voudrai c'est garder l'ordre dans lequel je coche les noms dans le menu déroulant et le faire en une fois

Jb: bien merci mais j'ai d'autre code sur ma feuille comment je fait avec la procedure calculate pour l'attribuer au qu'OK du filtre

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 31 Août 2015

• #8

Re : Evénement sur filtre

voir PJ

Code:

Private Sub Worksheet_Calculate()
  For Each n In ActiveWorkbook.Names
    If n.Name = "mémoNB" Then trouvé = True
  Next n
  If Not trouvé Then ActiveWorkbook.Names.Add Name:="mémoNB", RefersTo:="=" & [B2].Value
  If [B2] <> [mémoNB] Then
    MsgBox "modif"
    ActiveWorkbook.Names.Add Name:="mémoNB", RefersTo:="=" & [B2].Value
  End If
End Sub

JB

 

Pièces jointes

• FiltreAutoEvenement-2.xls

  45.5 KB · Affichages: 36
• FiltreAutoEvenement-2.xls

  45.5 KB · Affichages: 37

Dernière édition: 31 Août 2015

Vote positif 0 Vote négatif

C

Chombi

XLDnaute Occasionnel

• 31 Août 2015

• #9

Re : Evénement sur filtre

Merci JB

en reprenant votre exemple je voudrai par ex sur la colonne A qui comporte 33 noms:
- après décochage de l'ensemble
- je recoche par exemple en premier Zadig puis Ballutin en second
- OK du filtre
- la ligne de Zadig qui se trouvait à la 33eme position se retrouve en premiere et Ballutin qui se trouvait en première position se retrouve à la seconde

Mon idée était donc d'attribuer un numéro 1 à zadig et 2 à ballutin au cochage, puis de trier dans l'ordre croissant après OK
mais il y a peut être plus simple

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 1 Septembre 2015

• #10

Re : Evénement sur filtre

Non, je pensais sans filtre. Il ne te sert qu'à avoir les noms triés si j'ai bien compris.
Tu tries ta feuille, tu appliques tes filtres, ensuite une petite macro te pointe le nom avec le n° suivant quand tu cliques-droit dessus.
Après tu tries et tu filtres sur cette nouvelle colonne.
eric

PS: tu peux corriger des erreurs des pointages (supprimer des pointages)
Il y aura des trous pour les supprimés.

 

Dernière édition: 1 Septembre 2015

Vote positif 0 Vote négatif

C

Chombi

XLDnaute Occasionnel

• 1 Septembre 2015

• #11

Re : Evénement sur filtre

Bonjour eriiic, bonjour le forum

ci joint fichier de JB modifié qui illustre ce que je voulais faire
j'aurai aimé faire cela directement avec le menu déroulant du filtre mais je n'ai pas la solution
je l'ai fait avec un Uf, mais bon ...
je sollicite une nouvelle fois vos lumière je voudrai retirer de la liste du combo les noms déjà sélectionné au fur et a mesure comment puis je faire? (pour éviter de les sélectionner 2 fois)

Cordialement merci

 

Pièces jointes

• FiltreAutoEvenement-2.xls

  68 KB · Affichages: 26
• FiltreAutoEvenement-2.xls

  68 KB · Affichages: 26

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 1 Septembre 2015

• #12

Re : Evénement sur filtre

Bonjour,

Je viens de voir que j'avais omis le fichier exemple de ce que je te décrivais.
eric

 

Pièces jointes

• Classeur4.xlsm

  17.4 KB · Affichages: 22
• Classeur4.xlsm

  17.4 KB · Affichages: 25

Vote positif 0 Vote négatif

C

Chombi

XLDnaute Occasionnel

• 1 Septembre 2015

• #13

Re : Evénement sur filtre

Re eriiic

oui bien compris merci

je ne connaissais pas

Code:

Application.Max([B:B]) + 1

peut être bien pratique

cdlmt

 

Vote positif 0 Vote négatif

C

Chombi

XLDnaute Occasionnel

• 1 Septembre 2015

• #14

Re : Evénement sur filtre

Re eriiic

ma liste en A:A (pour toi) n'est dans mon fichier d'origine pas forcement en ordre alpha, de plus elle peut être très longue, c'est donc fastidieux de rechercher les noms
d’où l’intérêt de passer par un filtre il sont par ordre alpha sans faire de tri prealablement

 

Vote positif 0 Vote négatif

eriiic

XLDnaute Barbatruc

• 1 Septembre 2015

• #15

Re : Evénement sur filtre

Oui, ça suppose que tu tries par nom comme je l'écrivais.
Mais il y a plus compliqué...

 

Vote positif 0 Vote négatif