Comment puis-je Démasquer toutes les lignes de VBA de la dernière ligne?

voix
0

Sur la feuille de calcul, le LastRow est en fait 32, mais quand je lance ce sous, il est tout démasquage avant la ligne 30, et en laissant les deux 31 et 32 ​​cachés. De l'aide?

Dim I As Integer
Dim LastRow As Long
LastRow = Cells(Rows.Count, 4).End(xlUp).Row
For I = 1 To LastRow
    Rows(I).EntireRow.Hidden = False
Next I
Créé 13/02/2020 à 23:58
source utilisateur
Dans d'autres langues...                            


1 réponses

voix
1

LastRow = Cells(Rows.Count, 4).End(xlUp).Row retourne dernière ligne visible (avec données) ...

Dans ce cas, cela devrait fonctionner:

ActiveSheet.UsedRange.Rows.count

Même si je ne recommande jamais l'utiliser ...

Créé 14/02/2020 à 00:16
source utilisateur

Cookies help us deliver our services. By using our services, you agree to our use of cookies. Learn more