Fermer un .xla

Bonjour,

J'ai créé une macro qui ouvre une macro complémentaire (.xla).

Quand la macro ouvre le .xla, le .xla reste dans l'arborescence VBA.

Si je relance la macro, sans avoir fermé excel, j'ai un message d'erreur me précisant que le .xla est déjà ouvert et qu'on ne peut pas ré-ouvrir.

Est-ce qu'il existe un moyen d'ouvrir un .xla et, aprés que le travail soit fait, refermer cette .xla sans fermer excel ?

Merci pour votre aide.

Cordialement.

Bonjour,

Le nom des macros reste à ta convenance, tant qu'ils sont significatifs pour toi.

À tester :

Sub OuvreMacroComplementaire()
   On Error Resume Next
   ThisWorkbook.VBProject.References.AddFromFile "Le chemin complet de la macro\Coucou.xlam"
 End Sub

Sub FermeMacroComplementaire()
   Workbooks("Coucou.xlam").Close
End Sub

Gelinotte

Bonjour Gelinote,

Un trés grand merci pour ta réponse.

Cela marche parfaitement.

Bonne journée.

Bonjour,

Si tu as su chargé ta macro complémentaire au démarrage de ta macro. Tu sais donc la désinstaller ou encore vérifier si elle est active ou pas.

Voir du côté de Addin("xxx").Installed avec une condition.

Tu peux aussi joindre ton code VBA...

Cdlt.

Rechercher des sujets similaires à "fermer xla"