Afficher / Masquer des lignes en fonction d'une cellule / liste déroulante [Résolu]

Messages postés
26
Date d'inscription
vendredi 22 mai 2015
Statut
Membre
Dernière intervention
12 octobre 2019
- - Dernière réponse : DeutschWorker
Messages postés
26
Date d'inscription
vendredi 22 mai 2015
Statut
Membre
Dernière intervention
12 octobre 2019
- 12 oct. 2019 à 15:56
Bonjour,

Je vous sollicite aujourd'hui car je n'arrive pas à réaliser ce que je souhaite.

En effet, en cellule G1 j'ai créé une liste déroulante de périodes (qui d'ailleurs contient des blancs ...).

En dessous de cette cellule, j'ai créé un tableau avec des semaines où je référence des heures supp.

Je souhaiterai qu'en fonction de ce qui est affiché dans la cellule G1, il ne reste dans le tableau que les lignes qui correspondent à la période.

Soit : Période du 1 Octobre au 28 Octobre, qu'il ne reste que les 4 semaines de cette période dans le tableau.

Donc masquer les autres lignes j'imagine.

Pouvez vous m'aider à résoudre ce cas ? :/

Merci beaucoup,
Cordialement.



Afficher la suite 

3 réponses

Meilleure réponse
Messages postés
1100
Date d'inscription
lundi 2 juillet 2018
Statut
Membre
Dernière intervention
12 octobre 2019
133
1
Merci
Bonjour,
Un exemple de votre fichier serait le bienvenu mieux qu'une photo
Pour transmettre un fichier,
Veillez à ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES
il faut passer par un site de pièce jointe tel que cjoint.com

Allez sur ce site : http://cjoint.com
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...
Cordialement

Dire « Merci » 1

Heureux de vous avoir aidé ! Vous nous appréciez ? Donnez votre avis sur nous ! Evaluez CommentCaMarche

CCM 62264 internautes nous ont dit merci ce mois-ci

Commenter la réponse de JCB40
Messages postés
26
Date d'inscription
vendredi 22 mai 2015
Statut
Membre
Dernière intervention
12 octobre 2019
Commenter la réponse de DeutschWorker
Messages postés
6266
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
12 octobre 2019
397
0
Merci
Bonjour,

en vba à télécharger

https://www.cjoint.com/c/IJmnpORYZeQ

DeutschWorker
Messages postés
26
Date d'inscription
vendredi 22 mai 2015
Statut
Membre
Dernière intervention
12 octobre 2019
-
Bonjour,

Merci beaucoup pour votre réponse !

Pouvez vous me partager la vba ici ? je ne peux pas transférer par mail des fichiers avec macro sur mon poste de travail......

Merci :)
cs_Le Pivert
Messages postés
6266
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
12 octobre 2019
397 -
Mettre un Bouton avec ce code :

Option Explicit
Dim FL1 As Worksheet, NoCol As Integer
Dim NoLig As Long, Var As Variant
Private Sub CommandButton1_Click()
For_X_to_Next_Ligne
End Sub
Sub For_X_to_Next_Ligne()
    Set FL1 = Worksheets("Feuil1")
    NoCol = 3 'lecture de la colonne C
    For NoLig = 7 To Split(FL1.UsedRange.Address, "$")(4)
        Var = FL1.Cells(NoLig, NoCol)
        If Range("G2") = Var Then
        Rows("7:71").EntireRow.Hidden = True
       Rows(NoLig & ":" & NoLig + 4).EntireRow.Hidden = False
        End If
    Next
    Set FL1 = Nothing
End Sub




ATTENTION dans la liste déroulante il manque un 8 à 2018

Voilà

@+ Le Pivert
DeutschWorker
Messages postés
26
Date d'inscription
vendredi 22 mai 2015
Statut
Membre
Dernière intervention
12 octobre 2019
-
Merci Beaucoup pour votre aide !!!
Commenter la réponse de cs_Le Pivert