Suppression Macros
pzyko
Messages postés
34
Date d'inscription
Statut
Membre
Dernière intervention
-
pzyko Messages postés 34 Date d'inscription Statut Membre Dernière intervention -
pzyko Messages postés 34 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'ai un fichier .xlsm que j'aimerais reconvertir en fichier .xls
Pour cela, j'enregistre au format .xls et j'enlève tout le VBA grâce au code suivant :
La suppression des macros se fait bien mais lorsque je tente de réouvrir le fichier, les macros sont à nouveau présentes.
De plus, je n'arrive pas à lire correctement le fichier à cause d'un problème d'extension.
Merci d'avance de votre aide
j'ai un fichier .xlsm que j'aimerais reconvertir en fichier .xls
Pour cela, j'enregistre au format .xls et j'enlève tout le VBA grâce au code suivant :
Dim VbComp As Object
ThisWorkbook.SaveAs "D:\dossier\general\excel\test.xls"
For Each VbComp In ActiveWorkbook.VBProject.VBComponents ' 'suppression vba
Select Case VbComp.Type
Case 1 To 3
ActiveWorkbook.VBProject.VBComponents.Remove VbComp
Case Else
With VbComp.CodeModule
.DeleteLines 1, .CountOfLines
End With
End Select
Next VbComp
ActiveWorkbook.Save
La suppression des macros se fait bien mais lorsque je tente de réouvrir le fichier, les macros sont à nouveau présentes.
De plus, je n'arrive pas à lire correctement le fichier à cause d'un problème d'extension.
Merci d'avance de votre aide
A voir également:
- Suppression Macros
- Forcer suppression fichier - Guide
- Suppression compte gmail - Guide
- Suppression page word - Guide
- Suppression pub youtube - Accueil - Streaming
- Suppression facebook - Guide
