Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If ActiveSheet.Name = "Feuil1" Then
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
Else
ActiveWindow.DisplayHorizontalScrollBar = True
ActiveWindow.DisplayVerticalScrollBar = True
End If
End Sub