Comment masquer ou afficher une feuille de calcul spécifique en fonction de la valeur d'une cellule dans une autre feuille ?
Existe-t-il des méthodes pour masquer ou afficher un onglet de feuille de calcul spécifique en fonction du contenu d'une cellule dans une autre feuille ? Par exemple, lorsque j'entre le texte « Oui » dans la cellule G1 de Feuille2, je souhaite que Feuille1 soit masquée, et lorsque j'entre « Non », que Feuille1 soit immédiatement affichée. Comment puis-je résoudre ce problème dans Excel ?
Masquer ou afficher un onglet de feuille de calcul spécifique en fonction de la valeur d'une cellule avec un code VBA
Pour masquer ou afficher un onglet de feuille de calcul spécifique en fonction de la valeur d'une cellule dans une autre feuille de calcul, le code VBA suivant pourrait vous aider, veuillez procéder comme suit :
1. Allez dans la feuille de calcul qui contient la valeur de cellule sur laquelle vous souhaitez baser le masquage d'une autre feuille.
2. Cliquez avec le bouton droit sur l'onglet de la feuille, puis sélectionnez Affichage du code. Dans la fenêtre Microsoft Visual Basic for Applications qui s'affiche, copiez et collez le code suivant dans la fenêtre Module vide, voir capture d'écran :
Code VBA : Masquer ou afficher un onglet de feuille de calcul en fonction de la valeur d'une cellule :
Private Sub Worksheet_Change(ByVal Target As Range)
If [G1] = "Yes" Then
Sheets("Sheet1").Visible = True
Else
Sheets("Sheet1").Visible = False
End If
End Sub
Remarque : Dans le code ci-dessus, G1 et Oui sont la cellule et le contenu de la cellule sur lesquels vous souhaitez baser votre action, et Feuille1 est la feuille spécifique que vous souhaitez masquer ou afficher. Vous pouvez les modifier selon vos besoins.
3. Ensuite, enregistrez et fermez ce code. Lorsque vous entrez « Non » ou un autre texte dans la cellule G1, Feuille1 est masquée, mais si vous entrez « Oui » dans la cellule, Feuille1 est immédiatement affichée, voir captures d'écran :
 |
 |
 |
Découvrez la magie d'Excel avec Kutools AI
- Exécution intelligente : Effectuez des opérations sur les cellules, analysez les données et créez des graphiques, le tout piloté par des commandes simples.
- Formules personnalisées : Générez des formules adaptées pour rationaliser vos flux de travail.
- Codage VBA : Écrivez et implémentez du code VBA sans effort.
- Interprétation des formules : Comprenez facilement des formules complexes.
- Traduction de texte : Surmontez les barrières linguistiques dans vos feuilles de calcul.
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification 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é de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels