Bonjour,
J'utilise actuellement un classeur modèle .xltm dont toutes les macros sont dans le Module "Main"
La Feuille1 de ce classeur contient les quelques boutons qui utilisent ces macros.
Les autres feuilles constituent les données traitées.
Il est souhaité enregistrer ces données sans les macros qui sont désormais inutiles.
Voici la macro qui me permet de tuer la feuille1 et d'enregistrer le classeur théoriquement sans macro...
Sauf que le module "Main" fait de la résistance et est toujours présent.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Sub SaveMens() Dim MyFile, WB As Workbook If Worksheets.Count = 3 Then Application.DisplayAlerts = False Worksheets("Accueil").Delete MyFile = Application.GetSaveAsFilename(fileFilter:="Fichiers Excel (*.xlsx), *.xlsx") If MyFile <> False Then ActiveWorkbook.SaveAs Filename:=MyFile, FileFormat:=xlOpenXMLWorkbook End If End If End Sub
Avez vous une syntaxe plus efficace ou dois-je envisager plutôt d'exporter les feuilles qui m'intéressent vers un nouveau classeur ?
EDIT : Finalement j'ai utilisé Move : C'est plus simple.
Merci.
Partager