et avec
With ActiveWindow
'.DisplayHorizontalScrollBar = False 'on cache barre défilement basse
'.DisplayWorkbookTabs = False '' on cache les onglets
'.DisplayHeadings = False
'End With
Bonsoir,
A ma connaissance on ne peut masquer les titres que sur la feuille active
VB:
Sub SppTitre()
Dim sh As Worksheet
Application.ScreenUpdating = False
For Each sh In ThisWorkbook.Worksheets
sh.Activate
ActiveWindow.DisplayHeadings = False
Next
End Sub