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

  • Question
Microsoft 365 Listbox
Réponses
3
Affichages
248
Réponses
2
Affichages
296

Statistiques des forums

Discussions
312 307
Messages
2 087 096
Membres
103 468
dernier inscrit
TRINITY