Masquer valeurs non comprise

tototiti2008

XLDnaute Barbatruc

• 17 Octobre 2010

• #2

Re : Masquer valeurs non comprise

Bonjour guigui,

Comme tu testes les valeurs des cellules H9 et H10 à chaque tour, et que leur valeur ne change pas d'un tour à l'autre, il est normal que soit ça masque tout ou rien.

A priori je dirais qu'il faut utiliser la valeur de Tourne quelque part par là :

Code:

If Range("h9").Value < 0 Or _
Range("h10").Value > 0 Then

 

Vote positif 0 Vote négatif

G

guigui76

XLDnaute Occasionnel

• 17 Octobre 2010

• #3

Re : Masquer valeurs non comprise

Je te mets le fichier en piece jointe.
c'est bien logique de vérifier si les seuils non pas changé ? non?

 

Pièces jointes

• Classeur1.xls

  21.5 KB · Affichages: 37
• Classeur1.xls

  21.5 KB · Affichages: 43
• Classeur1.xls

  21.5 KB · Affichages: 45

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 17 Octobre 2010

• #4

Re : Masquer valeurs non comprise

Bonjour,

Bonjour, toto 🙂

Si j'ai bien compris....

Code:

Sub Masquer()
Dim MaxLigne As Long, Tourne As Long
Application.ScreenUpdating = False
MaxLigne = Range("h65536").End(xlUp).Row
For Tourne = 16 To MaxLigne
    Rows(Tourne).EntireRow.Hidden = Not (Cells(Tourne, 8).Value > [H9] And _
        Cells(Tourne, 8).Value < [H10])
Next Tourne
Application.ScreenUpdating = True
End Sub

Peut-être......

Bon dimanche

 

Vote positif 0 Vote négatif

G

guigui76

XLDnaute Occasionnel

• 17 Octobre 2010

• #5

Re : Masquer valeurs non comprise

Super.
Je te remercie pour ton aide.
Bon dimanche

 

Vote positif 0 Vote négatif