cacher barre de défilement

Dans le module des feuilles 2 et 3
Private Sub Worksheet_Activate()
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
End With
End Sub

dans le module de Feuil1 :
Private Sub Worksheet_Activate()
With ActiveWindow
.DisplayHorizontalScrollBar = true
.DisplayVerticalScrollBar = true
End With
End Sub

AV

Bonsour ® ????
dans le code de la feuil1(onglet feuil1, clic droit vualiser le code)
tu colles cela :

' ----masque les ascenseurs pour toutes les feuilles sauf la 1
Private Sub Worksheet_Activate()
With ActiveWindow
.DisplayHorizontalScrollBar = True
.DisplayVerticalScrollBar = True
End With
End Sub

Private Sub Worksheet_Deactivate()
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
End With
End Sub

Nb: à adapter s'il y a plus de 3 feuilles ...
@+

<anonymous@discussions.microsoft.com> a écrit dans le message de
news:13ea01c4b5f7$9786cd00$a501280a@phx.gbl...
Bonjour,

j'ai un document Excel de 3 feuilles.

J'aimerais que les barre de défilement horizontale et
verticale des feuilles 2 et 3 ne soient pas visible, mais
que celles de la feuille 1 le soit!

Est-ce possible?

Merci d'avance.

Meilleures salutations

Bonsour ®,
ou encore autrement dans le code de l'objet Thisworkbook

Private Sub Workbook_Sheetactivate(ByVal Sh As Object)
With ActiveWindow
.DisplayHorizontalScrollBar = (Sh.Name = "Feuil1")
.DisplayVerticalScrollBar = (Sh.Name = "Feuil1")
End With
End Sub
@+

<anonymous@discussions.microsoft.com> a écrit dans le message de
news:13ea01c4b5f7$9786cd00$a501280a@phx.gbl...
Bonjour,

j'ai un document Excel de 3 feuilles.

J'aimerais que les barre de défilement horizontale et
verticale des feuilles 2 et 3 ne soient pas visible, mais
que celles de la feuille 1 le soit!

Est-ce possible?

Merci d'avance.

Meilleures salutations