Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel compter les lignes non caché

compter les lignes non caché

21 réponses
Avatar
domind
bonjour à tous en ce dimanche pluvieux,

Je cherche à compter le nombre de lignes non caché (en VBA) et je pensais
que la ligne suivante pourrait le faire:

nbligne =
Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Rows.count

Le problème est qu'elle donne le nombre de ligne jusqu'à la première ligne
caché!

Quelqu'un connait il la fonction qui va bien.

Merci d'avance.
Signaler un problème avec ce contenu

10 réponses

Supprimer
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
1 2 3
Avatar
RaMa
bonjour

For Each d In Selection.Rows
If d.EntireRow.Hidden = False Then
ss = ss + 1
End If
Next

RaMa

"domind" a écrit dans le message de
news:iEaMb.1126$
bonjour à tous en ce dimanche pluvieux,

Je cherche à compter le nombre de lignes non caché (en VBA) et je pensais
que la ligne suivante pourrait le faire:

nbligne > Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Rows.count

Le problème est qu'elle donne le nombre de ligne jusqu'à la première ligne
caché!

Quelqu'un connait il la fonction qui va bien.

Merci d'avance.




Avatar
RaMa
Re bonjour
Ma reponse a ete enlevee du serveur!!!
une piste

For Each d In Selection.Rows
If d.EntireRow.Hidden = False Then
ss = ss + 1
End If
Next

RamA
"domind" a écrit dans le message de
news:iEaMb.1126$
bonjour à tous en ce dimanche pluvieux,

Je cherche à compter le nombre de lignes non caché (en VBA) et je pensais
que la ligne suivante pourrait le faire:

nbligne > Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Rows.count

Le problème est qu'elle donne le nombre de ligne jusqu'à la première ligne
caché!

Quelqu'un connait il la fonction qui va bien.

Merci d'avance.




Avatar
RaMa
re re bonjour

mon message a ete encore(2) supprime du serveur
Une piste
For Each d In Selection.Rows
If d.EntireRow.Hidden = False Then
ss = ss + 1
End If
Next
RaMa

"domind" a écrit dans le message de
news:iEaMb.1126$
bonjour à tous en ce dimanche pluvieux,

Je cherche à compter le nombre de lignes non caché (en VBA) et je pensais
que la ligne suivante pourrait le faire:

nbligne > Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Rows.count

Le problème est qu'elle donne le nombre de ligne jusqu'à la première ligne
caché!

Quelqu'un connait il la fonction qui va bien.

Merci d'avance.




Avatar
Philippe.R
Mais non, mais non, il est toujours la ;o))
"RaMa" a écrit dans le message de
news:
bonjour

For Each d In Selection.Rows
If d.EntireRow.Hidden = False Then
ss = ss + 1
End If
Next

RaMa

"domind" a écrit dans le message de
news:iEaMb.1126$
bonjour à tous en ce dimanche pluvieux,

Je cherche à compter le nombre de lignes non caché (en VBA) et je pensais
que la ligne suivante pourrait le faire:

nbligne > > Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Rows.count

Le problème est qu'elle donne le nombre de ligne jusqu'à la première ligne
caché!

Quelqu'un connait il la fonction qui va bien.

Merci d'avance.








Avatar
Philippe.R
Mais non, mais non, il est toujours la aussi ;o))
"RaMa" a écrit dans le message de
news:
Re bonjour
Ma reponse a ete enlevee du serveur!!!
une piste

For Each d In Selection.Rows
If d.EntireRow.Hidden = False Then
ss = ss + 1
End If
Next

RamA
"domind" a écrit dans le message de
news:iEaMb.1126$
bonjour à tous en ce dimanche pluvieux,

Je cherche à compter le nombre de lignes non caché (en VBA) et je pensais
que la ligne suivante pourrait le faire:

nbligne > > Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Rows.count

Le problème est qu'elle donne le nombre de ligne jusqu'à la première ligne
caché!

Quelqu'un connait il la fonction qui va bien.

Merci d'avance.








Avatar
FxM
Non, non, il est toujours là (ter)

@+
FxM


RaMa wrote:

re re bonjour

mon message a ete encore(2) supprime du serveur
Une piste
For Each d In Selection.Rows
If d.EntireRow.Hidden = False Then
ss = ss + 1
End If
Next
RaMa

"domind" a écrit dans le message de
news:iEaMb.1126$

bonjour à tous en ce dimanche pluvieux,

Je cherche à compter le nombre de lignes non caché (en VBA) et je pensais
que la ligne suivante pourrait le faire:

nbligne >>Range("A1").CurrentRegion.SpecialCells(xlCellTypeVisible).Rows.count

Le problème est qu'elle donne le nombre de ligne jusqu'à la première ligne
caché!

Quelqu'un connait il la fonction qui va bien.

Merci d'avance.









Avatar
AV
Je cherche à compter le nombre de lignes non caché (en VBA) et je pensais
que la ligne suivante pourrait le faire:


nbligne =MsgBox [subtotal(3,A:A)]

AV

Avatar
AV
C'est pas la peine de boucler (1)

AV
Avatar
AV
C'est pas la peine de boucler (2)

AV
Avatar
AV
C'est pas la peine de boucler (3)

AV
1 2 3