Comment verrouiller la position d'une feuille pour qu'elle soit toujours visible dans un classeur Excel ?
S'il y a plusieurs feuilles dans un classeur, lorsque vous naviguez jusqu'à la dernière feuille, la première feuille devient masquée dans la barre d'onglets des feuilles, comme illustré ci-dessous. Maintenant, vous souhaitez verrouiller la position d'une feuille principale pour qu'elle reste toujours visible, comment pouvez-vous procéder ?
 |  |  |
Verrouiller la position de la feuille avec VBA
Verrouiller la position de la feuille avec VBA
Voici deux codes VBA que je vous présente pour gérer cette tâche.
Accéder à une feuille spécifique en utilisant un raccourci
1. Appuyez sur les touches Alt + F11 pour activer Microsoft Visual Basic pour Windows.
2. Cliquez sur Insérer > Module, puis copiez et collez le code ci-dessous dans le script.
VBA : Accéder à la feuille principale
Sub GoToSheet()
'UpdatebyExtendoffice20180427
Sheets("Master").Activate
End SubRemarque : Dans l'extrait de code Sheets("Master").Activate, vous pouvez remplacer Master par n'importe quel nom de feuille selon vos besoins.
3. Ensuite, enregistrez ce code et revenez au classeur, cliquez Développeur > Macros.
4. Dans la Macro boîte de dialogue, sélectionnez le nom du code que vous venez d'insérer, cliquez Options, créez un raccourci pour exécuter ce code.
5. Cliquez sur OK et fermez la boîte de dialogue Macro.
Dès maintenant, en appuyant sur le raccourci que vous avez créé, la feuille principale sera activée indépendamment de la feuille actuellement utilisée.
Garder une feuille spécifique toujours au premier plan
1. Appuyez sur les touches Alt + F11 pour activer Microsoft Visual Basic pour Windows.
2. Double-cliquez sur ThisWorkbook dans le volet Projet-VBAProject, puis copiez et collez le code ci-dessous dans le script.
VBA : Garder la feuille toujours au premier plan
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'UpdatebyExtendoffice2018027
Dim xSheet As Worksheet
Application.EnableEvents = False
Set xSheet = Sheets("master")
If Sh.Name <> xSheet.Name Then
Sh.Move , xSheet
xSheet.Activate
Sh.Activate
End If
Application.EnableEvents = True
End Sub
3. Enregistrez le code et fermez la fenêtre VBA. Désormais, quelle que soit la feuille que vous sélectionnez, la feuille principale restera toujours au premier plan de la barre d'onglets.
 | |  |
Remarque : Dans le code ci-dessus, « master » est le nom de la feuille que vous souhaitez garder visible, modifiez-le selon vos besoins.
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