[Résolu]masquer feuille à la fermeture classeur

[jcf6464]

Bonjour le forum

j'ai beau chercher pas trouvé

je cherche a fermer toutes les pages du classeur avant sauvegarde comment intégrer la macro du masquage des feuilles

j'ai ce code

Public Sub CommandButton1_Click() 'copie sauvegarde classeur
Dim nom As String
Dim rep As Integer

nom = Day(Date) & "-" & Month(Date) & "-" & Year(Date) & "_" & ActiveWorkbook.Name
ActiveWorkbook.SaveCopyAs ActiveWorkbook.Path & "\" & nom
rep = MsgBox("Votre base de données est sauvegardée sous le nom : " & nom, vbYes + vbInformation, "Copie sauvegarde classeur")
ActiveWorkbook.Close savechanges:=False

End Sub

merci d'avance jcf64

 

[camarchepas]

Re : masquer feuille à la fermeture classeur

Bonjour ,

Le terme fermer , ainsi que le terme page ne se marient guère.

De plus tu présentes un code surement contenu dans un module feuille ou onglet .

il y a un évenementiel à utiliser dans le module thisworkbook :

Workbook_BeforeClose .

pour fermer l'instance Excel :

application.quit

 

[jcf6464]

Re : masquer feuille à la fermeture classeur

bonjour camarchepas


exact le code (macro) est sur une feuille accueil sur un bouton

il faudrait que le passe la macro dans module thisworkbook !!!

merci de ta réponse