J'utilise la fonction filtre elabor=E9 sous Excel (j'utilise
xlfilterInplace) et je souhaite par programmation VBA r=E9cup=E9rer le
num=E9ro des lignes du r=E9sultat du filtre.
Quand je parcours la feuille avec une boucle while je vois que tous mes
autres enregistrements sont pr=E9sent.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Elliac
Bonjour,
Le code suivant devrait t'aider :
Sub Toto() Range("a2").Select While ActiveCell <> "" If Not ActiveCell.EntireRow.Hidden = True Then cpt = cpt + 1 ActiveCell.Offset(1).Select Wend End Sub
Camille
Bonjour,
J'utilise la fonction filtre elaboré sous Excel (j'utilise xlfilterInplace) et je souhaite par programmation VBA récupérer le numéro des lignes du résultat du filtre.
Quand je parcours la feuille avec une boucle while je vois que tous mes autres enregistrements sont présent.
Quelqu'un aurait il une idée?
Cordialement.
Bonjour,
Le code suivant devrait t'aider :
Sub Toto()
Range("a2").Select
While ActiveCell <> ""
If Not ActiveCell.EntireRow.Hidden = True Then cpt = cpt + 1
ActiveCell.Offset(1).Select
Wend
End Sub
Camille
Bonjour,
J'utilise la fonction filtre elaboré sous Excel (j'utilise
xlfilterInplace) et je souhaite par programmation VBA récupérer le
numéro des lignes du résultat du filtre.
Quand je parcours la feuille avec une boucle while je vois que tous mes
autres enregistrements sont présent.
Sub Toto() Range("a2").Select While ActiveCell <> "" If Not ActiveCell.EntireRow.Hidden = True Then cpt = cpt + 1 ActiveCell.Offset(1).Select Wend End Sub
Camille
Bonjour,
J'utilise la fonction filtre elaboré sous Excel (j'utilise xlfilterInplace) et je souhaite par programmation VBA récupérer le numéro des lignes du résultat du filtre.
Quand je parcours la feuille avec une boucle while je vois que tous mes autres enregistrements sont présent.
Quelqu'un aurait il une idée?
Cordialement.
Yo
merci beaucoup cela fonctionne !
Cordialement.
Bonjour,
Le code suivant devrait t'aider :
Sub Toto() Range("a2").Select While ActiveCell <> "" If Not ActiveCell.EntireRow.Hidden = True Then cpt = cpt + 1 ActiveCell.Offset(1).Select Wend End Sub
Camille
Bonjour,
J'utilise la fonction filtre elaboré sous Excel (j'utilise xlfilterInplace) et je souhaite par programmation VBA récupérer le numéro des lignes du résultat du filtre.
Quand je parcours la feuille avec une boucle while je vois que tous mes autres enregistrements sont présent.
Quelqu'un aurait il une idée?
Cordialement.
merci beaucoup cela fonctionne !
Cordialement.
Bonjour,
Le code suivant devrait t'aider :
Sub Toto()
Range("a2").Select
While ActiveCell <> ""
If Not ActiveCell.EntireRow.Hidden = True Then cpt = cpt + 1
ActiveCell.Offset(1).Select
Wend
End Sub
Camille
Bonjour,
J'utilise la fonction filtre elaboré sous Excel (j'utilise
xlfilterInplace) et je souhaite par programmation VBA récupérer le
numéro des lignes du résultat du filtre.
Quand je parcours la feuille avec une boucle while je vois que tous mes
autres enregistrements sont présent.
Sub Toto() Range("a2").Select While ActiveCell <> "" If Not ActiveCell.EntireRow.Hidden = True Then cpt = cpt + 1 ActiveCell.Offset(1).Select Wend End Sub
Camille
Bonjour,
J'utilise la fonction filtre elaboré sous Excel (j'utilise xlfilterInplace) et je souhaite par programmation VBA récupérer le numéro des lignes du résultat du filtre.
Quand je parcours la feuille avec une boucle while je vois que tous mes autres enregistrements sont présent.
