Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Changer extension fichier lors de la création

fleet21

XLDnaute Junior
Bonjour à tous,

Je voudrais modifier l'extension d'un fichier créé xlsx en xlsm pour qu'il puisse prendre en charge les macros.

VB:
Option Explicit
Dim var As String
Chm = "C:\Users\Poste_1\Desktop\"
ActiveWorkbook.SaveAs Filename:=Chm & var & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False 'fonctionne mais ne prends pas en charge les macros
'ActiveWorkbook.SaveAs Filename:=Chm & var & ".xlsm", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False ne fonctionne pas

Voici le message d'erreur généré par la ligne mise en commentaire :
Erreur d'execution 1004
Impossible d'utiliser cette extension avec le type de fichier sélectionné. Modifier l'extension du fichier dans la zone de texte nom du fichier ou sélectionner un autre type de fichier dans la zone type de fichier.
 

Discussions similaires

Réponses
5
Affichages
304
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…