XL 2016 masquer lignes selon condition année

  • Initiateur de la discussion Initiateur de la discussion biba78
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

biba78

XLDnaute Junior
Bonjour à tous,
Tout d'abord je vous souhaite une très bonne année
j'ai besoin d'une Marco dans mon tableau, pour masquer toutes les lignes qui ne correspondent pas à l'année de la date sélectionnée dans la cellule C9.
En pièce jointe un exemple de fichier
en vous remerciant pour votre aide
 

Pièces jointes

Bonjour à tous,
Tout d'abord je vous souhaite une très bonne année
j'ai besoin d'une Marco dans mon tableau, pour masquer toutes les lignes qui ne correspondent pas à l'année de la date sélectionnée dans la cellule C9.
En pièce jointe un exemple de fichier
en vous remerciant pour votre aide
Bonjour et bonne année
Cela pourrait ressembler à ceci dans le module de la feuille.
VB:
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim i&
    If Intersect(Target, [c9]) Is Nothing Then Exit Sub
    Application.ScreenUpdating = False
    Columns(1).Rows.Hidden = False
    If [c9] = "" Then Exit Sub
    For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
        If Cells(i, 1) <> "" Then
            If Right(Cells(i, 1), 4) * 1 <> Year([c9]) Then Cells(i, 1).EntireRow.Hidden = True
        End If
    Next
End Sub
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
109
Réponses
5
Affichages
208
Réponses
1
Affichages
103
Réponses
7
Affichages
280
Retour