Bonjour à tous,

J'ai mis en place un code qui me permet de masquer les barres de défilement sur une feuille de calcul Excel, mais que celles-ci restent activent pour les autres feuilles.

En clair, lorsque les utilisateurs sont sur la feuille "Accueil", pas de barres de défilement. Mais restent affichées pour les autres feuilles.

Mais je souhaite compléter ce code avec le fait que l'on ne puisse pas utiliser la roulette de la souris uniquement pour la feuille "Accueil"

Pouvez-vous m'apporter votre aide s'il vous plait ?
Merci par avance

Voici le code qui permet d'afficher les barres et le suivant pour les masquer

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Masque les barres
Private Sub Worksheet_Activate()
With ActiveSheet
    ActiveWindow.DisplayHorizontalScrollBar = True
    ActiveWindow.DisplayVerticalScrollBar = True
End With
End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
Affiche les barres
Private Sub Worksheet_Activate()
With ActiveSheet
    ActiveWindow.DisplayHorizontalScrollBar = False
    ActiveWindow.DisplayVerticalScrollBar = False
End With
End Sub