VBA: Enregistrer un fichier xlam en xlsm

MJ13

XLDnaute Barbatruc
Bonjour à tous

Je cherche le code qui me permettrait d'enregistrer un fichier xlam en xlsm. Sachant que ce fichier est chargé en mémoire dans les macros complémentaires et est actif.

Cela m'a l'air complexe :confused:.

Merci d'avance :).
 

Pierrot93

XLDnaute Barbatruc
Re : VBA: Enregistrer un fichier xlam en xlsm

Re Michel:)

regarde peut être ceci :
Code:
With Workbooks("macrocompl.xlam")
    .IsAddin = False
    ActiveWorkbook.SaveCopyAs "C:\MesDocs\test.xlsm"
    .IsAddin = True
End With
A tester sous 2007 et +

bonne journée
@+
 

MJ13

XLDnaute Barbatruc
Re : VBA: Enregistrer un fichier xlam en xlsm

Re Pierrot

Ah, on se suit .Encore merci :).

Sur le fichier cela ne fonctionnait pas mais j'ai pu contourner le problème ainsi.

J'ai afficher le .xlam avec ce code (C'est super :)).

Code:
ThisWorkbook.IsAddin = False
Puis j'ai enregistré avec celui-ci (ainsi je peux même voir que c'est un xlam puisqu'il demeure dans le nom du fichier).

Code:
NOMW = ThisWorkbook.Name
chemin = CreateObject("WScript.Shell").specialFolders("Desktop")
ActiveWorkbook.SaveCopyAs chemin & "\" & NOMW & ".xlsm"

Encore Merci Pierrot et Bon Week-End :).
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas