[VBA] Centralisation des macros sur un réseau d'entreprise

Bonjour,

Je vous contacte car j'aimerais centraliser mes macros sur le réseau de mon entreprise, je m'explique.

Actuellement, chaque fichier contient la macro (Macro_Liste) et lorsqu'une modification doit être effectuée je dois modifier tous les fichiers Excel. Ce que je vousdrais c'est stocker ma macro et lorsque je modifie un fichier "principal" modifier tous les autres fichiers.

Je fonctionne actuellement de cette façon qui me pose quelques problèmes parfois (non suppression de la macro initiale et création de doublon dans le fichier Excel).

Private Sub Workbook_Open()

'== Mise à jour des macros ==

Dim Dossier, Modulos As String
Dim vbCom As Object

Call ScreenUpdating_Off 'Accélération de l'éxécution des macros

Dossier = "Lien"

If Dir(Dossier & "Macro_Liste.bas") = "" Then
Else
    On Error Resume Next
    With ActiveWorkbook.VBProject.VBComponents
    .Remove .Item("Macro_Liste")
    .Remove .Item("Macro_Liste1")
    End With
    On Error GoTo 0
    wbk_active = ActiveWorkbook.Name
    Modulos = Dossier & "Macro_Liste.bas"
    With Workbooks(wbk_active).VBProject
    .VBComponents.Import Modulos
    End With

End If

Call Macro_MiseAJour

'== Fin de mise à jour ==

On Error Resume Next
Call Macro_Liste.Macro_ListeCommune
Call Macro_Liste1.Macro_ListeCommune
On Error GoTo 0

Call ScreenUpdating_On 'Arrêt de l'accélaration de l'éxécution des macros

End Sub