Bonjour à tous,

Voici mon problème:

Je dois administrer un tableur dans lequel figure toute une série de renseignements dont, en colone H, une valeur numérique.

Je voudrais masquer les lignes entières pour lesquelles la valeur en H est égale à 0.

Sur excel 2003, j'utilisais ce code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Dim I As Long
Dim Plage As Range
Set Plage = Range("H1:H" & Range("H1").End(xlDown).Row)
For I = Plage.Cells.Count To 1 Step -1
    If Plage.Cells(I).Value = 0 Then
        Plage.Cells(I).EntireRow.Hidden = True
    End If
Next
Celà fonctionnait parfaitement et en un claquement de doigt le tour était joué.

Malheureusement, mon boss a cru bon de changer et de passer sous la suite office 2007.

Ce code fonctionne toujours aussi bien, mais mon problème est que ca prends facilement 2-3 minutes pour faire le tri sur 1200 lignes... et ce fichier pourrait atteindre très vite les 10.000 lignes... ca prendra alors beaucoup trop de temps.

Auriez-vous un autre code que celui-ci qui ferait la même chose, mais qui irait plus vite?

Merci d'avance pour vos lumières.