Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas ?

Patrice33740

XLDnaute Impliqué

• 9 Mai 2016

• #2

Re : Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas

Bonjour,

Effaces le filtre, incrémentes la série et rétablis le filtre.

 

Vote positif 0 Vote négatif

E

evolve

Guest

• 9 Mai 2016

• #3

Re : Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas

Merci bien mais le but de ce que je veux faire est d’appliquer une incrémentation au travers des autres numéros cachés par le filtre. Une fois le filtre appliqué, je veux faire défiler une incrémentation de numéro sur les cellules à l'écran vers le bas. Lorsque le filtre ne sera plus appliqué, les numéros de l'incrémentation seront évidemment déployé au travers d'autres numéros déjà présent avant le filtre. Pas facile d'être claire sur ce sujet. Merci pour votre réponse.

 

Vote positif 0 Vote négatif

E

evolve

Guest

• 9 Mai 2016

• #4

Re : Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas

Voici un fichier d'exemple. Est-ce possible d'incrémenter une série de numéro à la colonne "J" avec le filtre déjà appliqué de couleur orange ? Merci bien !

 

Pièces jointes

• Filtre&Incrementation.xlsx

  24.7 KB · Affichages: 70

Vote positif 0 Vote négatif

Patrice33740

XLDnaute Impliqué

• 9 Mai 2016

• #5

Re : Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas

Au lieu de filtrer, fais un tri (par couleur)

 

Vote positif 0 Vote négatif

E

evolve

Guest

• 9 Mai 2016

• #6

Re : Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas

Merci pour votre aide. Je dois malheureusement garder l'ordre tel quel des données, je ne peux donc pas trier car je ne pourrai pas retrouver l'ordre initial/original des données. Les données doivent retrouver leur place original après l'incrémentation (filtre retiré) c'est primordiale dans le cas présent.

 

Vote positif 0 Vote négatif

DoubleZero

XLDnaute Barbatruc

• 10 Mai 2016

• #7

Re : Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas

Bonjour à toutes et à tous,

Comme ceci ?

Code:

Option Explicit
Sub Incrémenter()
    Dim c As Range, compteur
    Application.ScreenUpdating = 0
    compteur = 1
    For Each c In Range("a2:a" & Rows.Count).SpecialCells(xlCellTypeVisible).SpecialCells(xlCellTypeConstants)
        c.Offset(, 9) = compteur
        compteur = compteur + 1
    Next
    Application.ScreenUpdating = -1
End Sub

A bientôt 🙂

 

Vote positif 0 Vote négatif

E

evolve

Guest

• 10 Mai 2016

• #8

Re : Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas

Excellent ! C'est exactement cela ... Je vous en remercie beaucoup et tous les autres qui ont pris le temps de m'aider!!!! 😉

 

Vote positif 0 Vote négatif

Victor21

XLDnaute Barbatruc

Supporter XLD

• 10 Mai 2016

• #9

Re : Incrémenter une série de numéro lorsqu'un filtre est appliqué...possible ou pas

Bonjour evolve, lézamis.

Sous réserve d'avoir compris la problématique, par formule, filtre désactivé, en J2, à recopier vers le bas :

=AGREGAT(3;1;A$2:A2)

Cliquez pour agrandir...

, puis appliquer les filtres désirés.

 

Vote positif 0 Vote négatif