G
GaLacTx
Guest
Bonjour,
Je cherche la syntaxe pour supprimer des feuilles lors de la fermeture d'un classeur, exemple; supprimer la feuil2 et la feuil3 avec BeforeClose.
J'ai essayé avec des déclarations dans ce genre mais je n'ai pas réussi
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim CL1 As Workbook
Dim sh As Worksheet
Set CL1 = Workbooks("Classeur1.xls")
For Each Sheets(sh) In CL1
sh.Names("feuil2", "feuil3)".delete
Merci!
Je cherche la syntaxe pour supprimer des feuilles lors de la fermeture d'un classeur, exemple; supprimer la feuil2 et la feuil3 avec BeforeClose.
J'ai essayé avec des déclarations dans ce genre mais je n'ai pas réussi
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim CL1 As Workbook
Dim sh As Worksheet
Set CL1 = Workbooks("Classeur1.xls")
For Each Sheets(sh) In CL1
sh.Names("feuil2", "feuil3)".delete
Merci!