Comment masquer ou afficher une feuille de calcul spécifique en fonction de la valeur de la 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 je saisis le texte «Oui» dans la cellule G1 de la feuille Sheet2, je veux que la feuille Sheet1 soit masquée, et lorsque je saisis «Non», la feuille Sheet1 s'affiche immédiatement. Comment pourrais-je résoudre ce problème dans Excel?
Masquer ou afficher un onglet de feuille de calcul spécifique en fonction de la valeur de la cellule avec le code VBA
Pour masquer ou afficher un onglet de feuille de calcul spécifique en fonction d'une valeur de cellule dans une autre feuille de calcul, le code VBA suivant peut vous rendre service, procédez comme suit:
1. Accédez à la feuille de calcul qui contient la valeur de cellule sur laquelle vous souhaitez masquer une autre feuille.
2. Cliquez avec le bouton droit sur l'onglet de la feuille et sélectionnez Voir le code, dans le sauté Microsoft Visual Basic pour applications fenêtre, veuillez copier et coller le code suivant dans la fenêtre Module vide, voir capture d'écran:
Code VBA: masquez ou masquez un onglet de feuille de calcul en fonction de la valeur de la 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 cellule sur lesquels vous souhaitez vous baser, et Sheet1 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, Sheet1 est masqué, mais si vous entrez «Oui» dans la cellule, Sheet1 s'affiche à la fois, voir les captures d'écran:
Meilleurs outils de productivité bureautique
Améliorez vos compétences Excel avec Kutools for Excel et faites l'expérience d'une efficacité comme jamais auparavant. Kutools for Excel offre plus de 300 fonctionnalités avancées pour augmenter la 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 facilite grandement votre travail
- Activer 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 réduit des centaines de clics de souris chaque jour!