Numerotation automatique de lignes visibles

[Fermé]
Signaler
Messages postés
2
Date d'inscription
dimanche 19 novembre 2017
Statut
Membre
Dernière intervention
1 mars 2018
-
Messages postés
7466
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
30 juillet 2021
-
bonjour
voici mon probleme: je copie ma feuille 1 que je filtre et colle en feuille 2. j'aimerais numeroter en colonne A de la feuille2 les lignes visibles apres le filtre et non les lignes masquées. quelqu'un peut -il m'aider?

2 réponses

Messages postés
2
Date d'inscription
dimanche 19 novembre 2017
Statut
Membre
Dernière intervention
1 mars 2018

en fait c'est un code vba pour faire tout ça que je cherche
Messages postés
7466
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
30 juillet 2021
645
Bonjour,

Voir ici

https://www.excel-downloads.com/threads/numerotation-de-ligne-visible.129227/

Tu colles la fonction dans un module et ensuite tu mets ta formule dans la colonne et tu tires vers le bas


Voilà
Merci bien j'essaierai le code demain samedi et je t'informerai
bonjour Le Pivert
j'ai essayé le code mais malheureusement ça ne marche pas. je joins le fichier afin que tu puisse me dire quel code placer dans le commandbutton1 pour que le filtre et la numerotation se fasse simultanement.merci
Messages postés
7466
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
30 juillet 2021
645
je joins le fichier

ya pas de fichier à télécharger

c'est simple:

Tu colles la fonction dans un module :

Public Function LigneVisible(cellule As Range) As Long
Application.Volatile
Dim i As Long
For i = cellule(1, 1).Row - 1 To 0 Step -1
    If cellule(1, 1).Offset(-i, 0).EntireRow.Hidden = False Then LigneVisible = LigneVisible + 1
Next i
End Function


Ensuite tu mets ceci dans un bouton:

Option Explicit
Private Sub CommandButton1_Click()
Range("A1").Value = "=LigneVisible(A1)" 'a adapter
End Sub


Tu vas sur ta feuille tu sélectionnes A1 et sur la croix en bas droite de la cellule tu tires vers le bas

Voilà

@+ Le Pivert