Discussion :

[blumea]

Bonjour,

J'aimerai mutualiser certaines functions ou procedures entre plusieurs fichiers XL.

J'ai bien essayé d'utiliser les xlam, mais si j'ai bien compris, ces add-ins sont liés à Excel, et non à un fichier, hors je ne veux pas qu'il soient chargés à chaque fois que j'utilise XL, mais uniquement lorsque j'utilise certains fichiers.

Il y a bien la possibilité d'un workbook xlm caché.

Je me demandais s'il y avait une autre solution ?

[issoram]

Bonsoir,

Tu peux exporter tes modules au format .bas et les importer depuis ton code VBA par la commande:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkbook.VBProject.VBComponents.Import FileName:="path_de_ton_module.bas"

J'espère avoir pu t'aider.

Cordialement.

[blumea]

Bonne idée, mais j'ai un problème de mise à jour du module importé. Je n'arrive pas à le desinstaller correctement à l'ouverture du fichier, avant de l'importer. A la première execution du code, c'est toujours l'ancienne version qui est executée.

ci dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Private Sub Workbook_Open()
 
    For Each m In ThisWorkbook.VBProject.vbcomponents
        If m.Type = 1 Then
            ThisWorkbook.VBProject.vbcomponents.Remove m
        End If
    Next
 
    ThisWorkbook.VBProject.vbcomponents.Import FileName:="monModule.bas"
 
     With Application
        .ScreenUpdating = False
        .EnableEvents = False
        Call monCode
        .ScreenUpdating = True
        .EnableEvents = True
    End With
 
End Sub

A l'ouverture du classeur, c'est l'ancienne version de la procédure monCode qui est executée. Par la suite, c'est la version importée.

Une idée ?