Numerotation automatique de lignes visibles
Blacklaz
Messages postés
2
Statut
Membre
-
cs_Le Pivert Messages postés 8437 Statut Contributeur -
cs_Le Pivert Messages postés 8437 Statut Contributeur -
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?
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?
A voir également:
- Excel vba numérotation automatique des lignes
- Liste déroulante excel - Guide
- Réponse automatique thunderbird - Guide
- Word et excel gratuit - Guide
- Aller à la ligne excel - Guide
- Déplacer colonne excel - Guide
2 réponses
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à
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à
je joins le fichier
ya pas de fichier à télécharger
c'est simple:
Tu colles la fonction dans un module :
Ensuite tu mets ceci dans un bouton:
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
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
