XL 2010 Masquer lignes si

Foued LAAMAMI

XLDnaute Nouveau
Bonjour,
Mes amis,
je veux masquer les lignes qui ont les cellules (C5:C50000) valeur différente de A1, bien sur à travers un macro, merci de nous donner une idée

Cordialement.
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Foued,
Peut être que le plus simple est d'utiliser un filtre avec :
VB:
Sub Masquer()
    ActiveSheet.Range("$C$4:$C$50000").AutoFilter
    ActiveSheet.Range("$C$5:$C$50000").AutoFilter Field:=1, Criteria1:="=" & [A1], Operator:=xlAnd
End Sub
Sub Démasquer()
    ActiveSheet.Range("$C$5:$C$50000").AutoFilter Field:=1
    Selection.AutoFilter
End Sub
 

Pièces jointes

  • Foued.xlsm
    15.5 KB · Affichages: 10

Foued LAAMAMI

XLDnaute Nouveau
Bonjour Foued,
Peut être que le plus simple est d'utiliser un filtre avec :
VB:
Sub Masquer()
    ActiveSheet.Range("$C$4:$C$50000").AutoFilter
    ActiveSheet.Range("$C$5:$C$50000").AutoFilter Field:=1, Criteria1:="=" & [A1], Operator:=xlAnd
End Sub
Sub Démasquer()
    ActiveSheet.Range("$C$5:$C$50000").AutoFilter Field:=1
    Selection.AutoFilter
End Sub
Merci bcp,
Je veux mettre le numéro de la semaine dans la cellule A1. Et les cellules C5 au C50000 contient des numéro de semaine différents. Donc je veux que les lignes de la semaine apparaissent
Merci
 

Discussions similaires

Réponses
10
Affichages
302

Statistiques des forums

Discussions
314 499
Messages
2 110 247
Membres
110 711
dernier inscrit
chmessi