Comment masquer ou afficher des colonnes selon la sélection effectuée dans une liste déroulante Excel ?
Lorsque vous utilisez Excel, vous pouvez masquer ou afficher des colonnes en fonction de la sélection effectuée dans une liste déroulante. Par exemple, si vous choisissez « Non », les colonnes C à I seront masquées ; si vous sélectionnez « Oui », ces mêmes colonnes seront automatiquement réaffichées. Consultez la capture d’écran ci-dessous.
Dans cet article, nous vous présentons une méthode VBA simple pour masquer ou afficher des colonnes selon votre choix dans une liste déroulante Excel.
Masquer ou afficher des colonnes en fonction de la sélection effectuée dans une liste déroulante Excel
Comme illustré dans l’exemple ci-dessus, pour masquer ou afficher les colonnes C à I en fonction de votre sélection dans la liste déroulante, suivez ces étapes.
1. Commencez par créer votre liste déroulante avec les options « Oui » et « Non », selon vos besoins.
2. Appuyez ensuite sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
3. Double-cliquez sur le nom de la feuille actuellement ouverte dans la section VBAProject pour ouvrir l’éditeur de code.
4. Copiez ensuite le code VBA ci-dessous et collez-le dans l’éditeur de code.
Code VBA : masquer ou afficher des colonnes en fonction de la sélection effectuée dans une liste déroulante
Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20180822
If Target.Column = 2 And Target.Row = 3 Then
If Target.Value = "No" Then
Application.Columns("C:I").Select
Application.Selection.EntireColumn.Hidden = True
ElseIf Target.Value = "Yes" Then
Application.Columns("C:I").Select
Application.Selection.EntireColumn.Hidden = False
End If
End If
End SubRemarque : dans le code ci-dessus, Column = 2 et Row = 3 correspondent à la référence de cellule de la liste déroulante, et la plage C:I désigne les colonnes que vous souhaitez masquer ou afficher. Adaptez-les selon vos besoins.
5. Appuyez simultanément sur les touches Alt + Q pour fermer la fenêtre Microsoft Visual Basic pour Applications.
Désormais, dès que vous sélectionnez « Non » dans la liste déroulante, toutes les colonnes spécifiées sont automatiquement masquées.
En revanche, si vous sélectionnez « Oui » dans la liste déroulante, toutes les colonnes masquées s’affichent instantanément.
Libérez la magie d’Excel avec Kutools IA
- Exécution intelligente : effectuez des opérations sur les cellules, analysez des données et créez des graphiques, le tout à partir de commandes simples.
- formules personnalisées : créez des formules sur mesure pour rationaliser vos flux de travail.
- Programmation VBA : Écrivez et implémentez du code VBA en toute simplicité.
- Interprétation de formules : Décryptez facilement les formules complexes.
- Traduction de texte : Franchissez les barrières linguistiques directement depuis vos feuilles de calcul.
Articles associés :
- Comment remplir automatiquement d’autres cellules en fonction de la valeur sélectionnée dans une liste déroulante Excel ?
- Comment activer la saisie semi-automatique lors de la saisie dans une liste déroulante Excel ?
- Comment créer un calendrier sous forme de liste déroulante dans Excel ?
- Comment créer une liste déroulante avec fonction de recherche dans Excel ?
- Comment créer une liste déroulante permettant de sélectionner plusieurs valeurs dans Excel ?
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels