Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Dans une feuille "Entrée", j'aimerais limiter les lignes de 1 à 20 et les colonnes de A à F pour regrouper les boutons de mon menu, d'une manière à ne pas voir la barre de défilement.
Pour cela il te suffit de :
-> cliquer sur "outils" / "options"
-> sélectionner l'onglet "affichage"
-> décocher les cases : "Barre de défilement horizontale" ainsi que "Barre de défilement verticale"
Pour cela il te suffit d'agrandir suffisamment une(ou plusieurs) lignes et colonnes pour que l'ensemble des lignes et colonnes tiennent toute la place à l'écran.
Mais comme toutes solutions, elle a ses limites.
Si tu as un écran avec une résolution d'écran de :
-> 1440 * 900 pixels
-> ou 1024 * 768
-> ou ...
et que les autres utilisateurs n'ont pas la même résolution, ils ne verront pas l'ensemble des boutons, où verront des colonnes/lignes supplémentaires.
Agrandir suffisamment la hauteur des 20 premières lignes pour qu'elles remplissent à elles seul tout ton écran en hauteur. Même logique que pour les colonnes.
En renseignant manuellement la propriété ScrollArea de la feuille ($A$1:$L$20) dans l'éditeur VBA, vous ne pourrez sélectionner que cette zone, et les barres de défilement (qu'il est possible de masquer) n'iront ni plus à droite de la colonne L, ni plus bas que la ligne 20.
Pour réaliser la même chose manuellement (??):
- ne pas renseigner la propriété ScrollArea
- Sélectionner la colonne M
- [Ctrl+Shift+flèche vers la gauche] a pour but de sélectionner toutes les colonnes depuis la colonne M
- clic droit sur l'intitulé des colonnes --> Masquer
- Sélectionner la ligne 21 puis [Ctrl+Shift+flèche vers le bas] --> Masquer
- sélectionner A1:L20
- Cliquer sur le facteur de zoom (a priori 100%)
- Sélectionner "Ajuster à la sélection
Supprimer les barres de défilement -> c'est dans les Options d'Excel.
Le problème est que cela s'applique à toutes les feuilles du classeur
Private Sub Worksheet_Activate()
With Me 'Worksheets("Entrée")
.Range(Columns("H"), Columns("H").End(xlToRight)).EntireColumn.Hidden = True
.Range(Rows("21"), Rows("21").End(xlDown)).EntireRow.Hidden = True
.ScrollArea = "A1:L20"
.Range("A1:L20").Select
ActiveWindow.Zoom = True
.Range("H21").Select
ActiveWindow.FreezePanes = True
End With
End Sub
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD