Re : comment masquer les onglets à la fermeture du classeur
Bonjour,
Il faut que tu indiques ton code dans la partie Thisworkbook
pour la fermeture :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
on error resume next
For i = 1 To Sheets.Count
If Sheets(i).Name <> "Menu" Then Sheets(i).Visible = False
Next i
End Sub
et ce code pour l'ouverture
Private Sub Workbook_Open()
On Error Resume Next
For i = 1 To Sheets.Count
Sheets(i).Visible = False
Next i
End Sub
Il est nécessaire de garder une feuille visible (dans mon exemple menu) pour par exemple dire si vous voyez cette page, activez les macros
@ +
Juju