Sujet Précédent Sujet Suivant

Excel masquer cellules selon choix liste déroulante

Fermé
Boyeju Messages postés 9 Date d'inscription lundi 9 mars 2015 Statut Membre Dernière intervention 2 septembre 2016 - 9 mars 2015 à 15:03
Mike-31 Messages postés 18310 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 29 mars 2024 - 9 mars 2015 à 18:13
Bonjour,

Je ne maitrise que les basiques d'Excel et je rencontre actuellement le problème suivant:
Je souhaiterais masquer certaines lignes de mon fichier Excel en fonction du choix effectué parmi ma liste déroulante.
Le but étant d'afficher certaines lignes pour une catégorie A de la liste déroulante et des cellules supplémentaires pour une catégories B.
Merci d'avance pour vos réponses!
A voir également:

3 réponses

Réponse 1 / 3
Mike-31 Messages postés 18310 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 29 mars 2024 5 073
9 mars 2015 à 18:13
Bonsoir le fil,

Clic droit sur l'onglet de la feuille concernée et Visualiser le code pour accéder au code
ensuite sur la feuille en G2 une simple liste de validation
2
Réponse 2 / 3
Mike-31 Messages postés 18310 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 29 mars 2024 5 073
9 mars 2015 à 15:12
Bonjour,

Regarde ce bout de fichier,

https://www.cjoint.com/c/ECjpx4lnKH9
1
Réponse 3 / 3
Boyeju Messages postés 9 Date d'inscription lundi 9 mars 2015 Statut Membre Dernière intervention 2 septembre 2016 1
9 mars 2015 à 17:42
Oui c'est exactement ça que je voudrais, aurais-tu la méthodo à appliquer pour obtenir ce résultat?
Merci!
1
ozone_ Messages postés 1518 Date d'inscription lundi 13 juillet 2009 Statut Membre Dernière intervention 2 juin 2023 478
9 mars 2015 à 18:01
Mike-31 à crée une macro qui permet de faire le travaille que tu as demandé dans ton post précédent.

La macro étant celle-ci : 
Private Sub Worksheet_Change(ByVal Target As Range)

    Application.ScreenUpdating = False
    If Target.Address = "$G$2" Then
        If [G2] = "Tous" Then
            Range("G3:G100").EntireRow.Hidden = False
        Exit Sub
        End If
        Set MyPlage = Range("G3:G100")
        For Each cell In MyPlage
            If cell.Value <> [G2] Then
                cell.EntireRow.Hidden = True
            ElseIf cell.Value = [G2] Then
            cell.EntireRow.Hidden = False
            End If
        Next
    End If
    Application.ScreenUpdating = True
    
End Sub
0

Discussions similaires

Suppression listes déroulantes
Archa -
Sam -

5 réponses
Supprimer liste déroulante Excel
SamAlex -
b@bd -

8 réponses