Bonjour,

À l'ouverture de mon Workbook, j'utilise Workbook_Open dans l'objet ThisWorkbook pour initialiser des informations.

Je veux aussi prendre l'occasion pour rafraîchir le seul fichier module.bas existant au projet.

J'utilise donc la séquence suivante:


Dim VBProj As VBIDE.VBProject
Dim VBComp As VBIDE.VBComponent

Set VBProj = ActiveWorkbook.VBProject
Set VBComp = VBProj.VBComponents("Ensemble.bas")
VBProj.VBComponents.Remove VBComp

Set VBProj = ActiveWorkbook.VBProject
Set VBComp = VBProj.VBComponents.Add(vbext_ct_StdModule)
VBComp.Name = "P:\User\Modules\Ensemble.bas"
A la ligne .Remove je reçois une erreur 1004 avec mention l'accès par programme au projet Visual Basic n'est pas fiable et le fichier est toujours en place.

Une idée ??